VB6 Behela weda karanne Kauda? Mehe Enna

madurax86

Member
Jun 29, 2006
4,385
88
0
lalanthakumara said:


Mama me machanla 2genma thamai ahanne

mata ona

Button eka click kalama
ape computer eke web browser eka open wela web page ekak auto open wenna liyanna

Dannavada?
apo
shell(<browser_path>) dila balanna shell gahala ( gahadima tip eke pennai syntax eka
 

Dan01

Active member
  • Oct 16, 2006
    3,789
    6
    38
    38
    No one know Where i live
    lalanthakumara said:


    Ohoma internet explorer open unata
    Apita behene apita ona web page eka open karavanna

    internet explorer ekata call karavanne kohomda e vede karanna kiyala??
    ekai mata thiyena prashne?

    Try This
    This will work for you

    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

    Private Sub Command1_Click()
    ShellExecute 0, "open", "www.elakiri.com", 0&, 0&, 0
    End Sub
     

    gamsi

    Member
    Oct 10, 2008
    653
    3
    0
    NATHTHANDIYA
    Dan01 said:
    Try This
    This will work for you

    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

    Private Sub Command1_Click()
    ShellExecute 0, "open", "www.elakiri.com", 0&, 0&, 0
    End Sub

    api dena page ekata yanne nane ban.home page ekatai yanne.:no::no::no:
     
    Mar 12, 2007
    2,277
    96
    0
    41
    කඳුළු අතර
    Dan01 said:
    Try This
    This will work for you

    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

    Private Sub Command1_Click()
    ShellExecute 0, "open", "www.elakiri.com", 0&, 0&, 0
    End Sub

    Elakiri Machan Elakiri
    Umbata Budu Bava athvenna Onaaaa
    Thanksssss
    Me Thred Eke poddak alert eke indala apita podi help ekak deeepan
     
    Mar 12, 2007
    2,277
    96
    0
    41
    කඳුළු අතර
    Dan01 said:
    Try This
    This will work for you

    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

    Private Sub Command1_Click()
    ShellExecute 0, "open", "www.elakiri.com", 0&, 0&, 0
    End Sub

    Meka Firefox valin open wenne defolt Browser eka nisada?