[VB6] Collegamenti ipertestuali in un form

[God of Gta]

Come inserisco dei collegamenti ipertestuali in una form?

[yyzyyz]

Originariamente inviato da God of Gta
Come inserisco dei collegamenti ipertestuali in una form?

modulo:

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

form:

Public Sub ExecuteLink(ByVal sLinkTo As String)
    
    On Error Resume Next
    
    Dim lRet As Long
    Dim lOldCursor As Long
    
    lOldCursor = Screen.MousePointer
    
    Screen.MousePointer = vbHourglass
    
    lRet = ShellExecute(0, "open", sLinkTo, "", vbNull, SW_SHOWNORMAL)
    '
    If lRet >= 0 And lRet <= 0 Then
        Screen.MousePointer = vbDefault
        MsgBox "error Opening Link to " & sLinkTo & vbCrLf & _
            vbCrLf & Err.LastDllError, , "ExecuteLink"
    End If
    Screen.MousePointer = vbDefault
    '
End Sub
Private Sub Label1_Click()
ExecuteLink ("http://www.html.it")
End Sub

[God of Gta]

me lo spiegheresti in modo + chiaro???mi da errore...

[yyzyyz]

Originariamente inviato da God of Gta
me lo spiegheresti in modo + chiaro???mi da errore...

... ke errore, spiegati=?

[God of Gta]

ho 14 anni....cosa cambia tra modulo e form??

[LMondi]

Ciao God of Gta,
a parte la differenza tra Form e Modulo Bas che comunque potrai vedere su qualsiasi testo, il codice entra in errore perchè non è dichiarata una variabile; quindi nel modulo bas scrivi
Public SW_SHOWNORMAL
e vedrai che ora il codice funziona.

[oregon]

No LMondi ...

Quella non e' una variabile ma una costante e deve essere dichiarata cosi'

Const SW_SHOWNORMAL = 1

[yyzyyz]

scusate ma a me funziona benissimo :master: , forse xchè utilizzo FF , IE l'ho cestinato tempo fa'
cmq se vuoi puoi aggiungere anke queste altre costanti al codice ke ti ho postato.

Const SW_HIDE = 0
Const SW_SHOWNORMAL = 1
Const SW_SHOWMINIMIZED = 2
Const SW_SHOWMAXIMIZED = 3
Const SW_SHOWNOACTIVATE = 4
Const SW_SHOW = 5
Const SW_MINIMIZE = 6
Const SW_SHOWMINNOACTIVE = 7
Const SW_SHOWNA = 8
Const SW_RESTORE = 9
Const SW_SHOWDEFAULT = 10

[oregon]

Originariamente inviato da yyzyyz
scusate ma a me funziona benissimo :master: , forse xchè utilizzo FF , IE l'ho cestinato tempo fa'
cmq se vuoi puoi aggiungere anke queste altre costanti al codice ke ti ho postato.

Const SW_HIDE = 0
Const SW_SHOWNORMAL = 1
Const SW_SHOWMINIMIZED = 2
Const SW_SHOWMAXIMIZED = 3
Const SW_SHOWNOACTIVATE = 4
Const SW_SHOW = 5
Const SW_MINIMIZE = 6
Const SW_SHOWMINNOACTIVE = 7
Const SW_SHOWNA = 8
Const SW_RESTORE = 9
Const SW_SHOWDEFAULT = 10

Scusami ... a te funziona perche' hai dichiarato la costante

Const SW_SHOWNORMAL = 1

che non avevi postato nella tua risposta.

Tutte le costanti che hai postato, a parte quella, non servono.

E soprattutto, non c'entra assolutamente IE, che funziona benissimo e che uso regolarmente.

[God of Gta]

nn mi va...saro' scemo ma nn mi va...ma mi spiegate la diff tra modulo e form???e dove devo dichiarare la costante??nella sezione generale?