Results 1 to 3 of 3

Thread: Inter net apps..

  1. #1

    Thread Starter
    Frenzied Member RudyL's Avatar
    Join Date
    Mar 2001
    Location
    Chicago
    Posts
    1,519

    Inter net apps..

    Does anyone now of an easier way to do this...

    dim
    Retval = Shell("C:\Program Files\Internet Explorer\IEXPLORE.EXE www.yahoo.com",vbNormalFocus)


    I would like to be able to do it without having to put the directory path (C:\Program Files\Internet Explorer\) in there? The reason is because I do not necessarly know the directory path, pluse, the user might have netscape or something else and I would like it to load as if I were to type it into the run menu...(Ex. www.yahoo.com)

    Thanks in advace
    10 different ways to skin a cat and amazingly enough each and every one has the same result, the cat gets skinned! The same can be applied to code, so be nice and accept each others "preferences".

  2. #2
    I'm about to be a PowerPoster! Hack's Avatar
    Join Date
    Aug 2001
    Location
    Searching for mendhak
    Posts
    58,333
    VB Code:
    1. Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal  hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long)  As Long
    2.  
    3. Private Sub Command1_Click()
    4.    Dim OpenPage As Long
    5.      OpenPage = ShellExecute(Form1.hwnd, "Open", "http://www.yahoo.com",  0&, 0&, 0&)
    6. End Sub

  3. #3

    Thread Starter
    Frenzied Member RudyL's Avatar
    Join Date
    Mar 2001
    Location
    Chicago
    Posts
    1,519

    Thanks

    Sweet! Thanks alot!

    R

    10 different ways to skin a cat and amazingly enough each and every one has the same result, the cat gets skinned! The same can be applied to code, so be nice and accept each others "preferences".

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width