Dream.In.Code > Programming Help > Visual Basic

Welcome to Dream.In.Code
	Getting VB Help is Easy! Join 132,328 VB Programmers for FREE! Get instant access to thousands of VB experts, tutorials, code snippets, and more! There are 1,093 people online right now. Registration is fast and FREE... Join Now! Chat LIVE With a VB Expert

retrieve WAN IP (Router IP) with vb6

Reply to this topic

Start new topic

retrieve WAN IP (Router IP) with vb6

adsoft_05	16 Feb, 2008 - 01:36 AM Post #1
New D.I.C Head Joined: 16 Feb, 2008 Posts: 2	Pls help me with a suggestion regarding how to find my router IP using VB code. One solution is to call an external web site as http://whatismyip.com/automation/n09230945.asp, but i want that my program to use this IP (so to extract it from this web page). I used for my program vb6. Wait for a reply!
	This Post Was Helpful! ^New!


Register for Free to Make These Ads Go Away!

PsychoCoder	16 Feb, 2008 - 07:22 PM Post #2
using DIC.Core; Joined: 26 Jul, 2007 Posts: 8,923 Thanked 118 times Dream Kudos: 8475 Expert In: VB, VB.Net, C#, SQL, ASP, ASP.Net, Web Development, HTML, CSS, Win32 API, Javascript, mySQL, J#, Boo.Net My Contributions	Dream.In.Code has a policy by which we prefer to see a good faith effort on your part before providing source code for homework assignments. Please post the code you have written in an effort to resolve the problem, and our members would be happy to provide some guidance. Be sure to include a description of any errors you are encountering as well. Post your code like this: Thanks
	This Post Was Helpful! ^New!

adsoft_05	18 Feb, 2008 - 09:09 AM Post #3
New D.I.C Head Joined: 16 Feb, 2008 Posts: 2	tks for your suggestion and i will keep in account for my next questions your policy, anyway i found myself a solution, which i will post bellow: CODE Call URLDownloadToFile(0, "http://whatismyip.com/automation/n09230945.asp", App.Path & "\ipaddress.htm", 0, 0) If Dir(App.Path & "\ipaddress.htm") <> "" Then cTemp = CreateObject("Scripting.FileSystemObject").OpenTextFile(App.Path & "\ipaddress.htm").ReadAll lblWanIP.Caption = cTemp Kill App.Path & "\ipaddress.htm" End If , if there are other solutions , please let me know ... i used this in a small chat program tks and brgds. This post has been edited by PsychoCoder: 18 Feb, 2008 - 09:15 AM
	This Post Was Helpful! ^New!

Fast Reply

Reply to this topic

Start new topic

Display Mode: Standard · Switch to: Linear+ · Switch to: Outline

Track this topic · Email this topic · Print this topic · Subscribe to this forum

Time is now: 11/22/08 02:50AM

Invision Power Board v2.1.7 © 2008 IPS, Inc.

Licensed to: MediaGroup1

Advertising | Terms of Use | Privacy Policy | About Us | Site Map

Forum Index: Programming Help | C and C++ | Visual Basic | Java | VB.NET | C# | ASP.NET | PHP | ColdFusion | Perl and Python | Ruby | Databases | Other Languages | Game Programming | Software Development | Computer Science | Industry News | Programming Tutorials | C++ Tutorials | Visual Basic Tutorials | Java Tutorials | VB.NET Tutorials | C# Tutorials | PHP Tutorials | Linux Tutorials | ColdFusion Tutorials | Windows Tutorials | HTML/JavaScript Tutorials | CSS Tutorials | Flash Tutorials | Web Promotion Tutorials | Photoshop Tutorials | Software Development Tutorials | Database Tutorials | Other Language Tutorials |

Copyright 2001-2008 MediaGroup1 LLC, All Rights Reserved
A MediaGroup1 LLC Production - Version 6.0.2.1.36

Search^Updated!w00t

Over 509,000 Pages! Advanced Forum Search

Live VB Help!

VB Tutorials

Reference Sheets

VB Snippets

Bye Bye Ads

Free DIC T-Shirt

T-Shirt Example

Related Sites

Monthly Drawing

Partners

Top Contributors

Top 10 Kudos This Month