det virker ikke her
kan man ille bare få den til at åbne en ller andet.html med are at klikke på feks. en knap
mvh Henrik Cichosz
"Jan V." <jvFJERNDETTE@OG DETTEHEROGSÅmiljodata.dk> skrev i en meddelelse news:3d882948$0$66803$edfadb0f@dspool01.news.tele.dk...
>
> "Henrik Cichosz" <cichosz@tdcadsl.dk> skrev i en meddelelse
> news:am7fm7$s8t$1@sunsite.dk...
> > hvis jeg har en Picurebox og når man klikker på den så skal den åbne
> TEST.HTML hvad skriver man så
> >
> > Private Sub Picture4_Click()
> > Hvad skal der være her ???
> > End Sub
> >
> > MVH Henrik Cichosz
> >
> Erklær den her et eller andet sted:
>
> Public 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
>
> og brug den her kode i dit Click event:
>
> Dim iret As Long
>
> iret = ShellExecute(Me.hwnd, vbNullString, "
www.etellerandet.dk",
> vbNullString, "c:\", 1)
>
> Så åbner den med defaultbrowseren - uanset hvad det er for en.
>
> Jan
>
>