/ Forside / Teknologi / Udvikling / VB/Basic / Nyhedsindlæg
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
VB/Basic
#NavnPoint
berpox 2425
pete 1435
CADmageren 1251
gibson 1230
Phylock 887
gandalf 836
AntonV 790
strarup 750
Benjamin... 700
10  tom.kise 610
Hyperlink i VB
Fra : Claus Rasmussen


Dato : 25-02-02 18:47

Hejsa NG !!

er der nogen der kan hjælpe mig ??

Hvordan for man knytet et hyperlink til et billede der ligger som baggrund
på formen

på forhånd tak !!



 
 
Jens (25-02-2002)
Kommentar
Fra : Jens


Dato : 25-02-02 22:44

Noget i stil med dette !

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single,
Y As Single)

Dim sti As String

sti = Dir("C:\Program Files\Internet Explorer\IEXPLORE.EXE")
If sti = "" Then
Shell "C:\Programmer\Internet Explorer\IEXPLORE.EXE www.infojens.dk",
vbMaximizedFocus
Else
Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE www.infojens.dk",
vbMaximizedFocus
End If

End Sub



"Claus Rasmussen" <strit@pc.dk> wrote in message
news:3c7a7850$0$10848$edfadb0f@dspool01.news.tele.dk...
> Hejsa NG !!
>
> er der nogen der kan hjælpe mig ??
>
> Hvordan for man knytet et hyperlink til et billede der ligger som baggrund
> på formen
>
> på forhånd tak !!
>
>



Jan V. (26-02-2002)
Kommentar
Fra : Jan V.


Dato : 26-02-02 08:03


"Jens" <til@infojens.dk> skrev i en meddelelse
news:3c7aafeb$0$56607$edfadb0f@dspool01.news.tele.dk...
> Noget i stil med dette !
>
> Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As
Single,
> Y As Single)
>
> Dim sti As String
>
> sti = Dir("C:\Program Files\Internet Explorer\IEXPLORE.EXE")
> If sti = "" Then
> Shell "C:\Programmer\Internet Explorer\IEXPLORE.EXE www.infojens.dk",
> vbMaximizedFocus
> Else
> Shell "C:\Program Files\Internet Explorer\IEXPLORE.EXE
www.infojens.dk",
> vbMaximizedFocus
> End If
>
> End Sub
>
>
Denne løsning forudsætter selvfølgelig at man har IE på sin maskine.

En løsning, der er uafhængig af hvilken browser man har på sin PC, kunne
være istedet at skrive:

ShellExecute(Me.hwnd, vbNullString, "www.infojens.dk", vbNullString, "", 1)

Så tager den bare det program der er associeret med HTML.


Jan





Lars F. Jørgensen (26-02-2002)
Kommentar
Fra : Lars F. Jørgensen


Dato : 26-02-02 12:01

Hej,

> ShellExecute(Me.hwnd, vbNullString, "www.infojens.dk", vbNullString, "",
1)
> Så tager den bare det program der er associeret med HTML.

Findes der en måde hvor på man kan sikre at den ikke blot tager en allerede
åben browser, men starter en ny hver gang?


/Lars



Søg
Reklame
Statistik
Spørgsmål : 177559
Tips : 31968
Nyheder : 719565
Indlæg : 6408938
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste