Åpne nettside i standard nettleser?

[Jolo]

Er veldig noob på VB bare for å nevne det.

 

Da er problemet mitt.

Hvordan åpner man er nettside med å trykke på en Commandbutton. Vil at nettsiden skal åpnes i standard nettleser.

 

På forhånd takk.

[aadnk]

Bruk Process.Start:

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

        Process.Start("http://www.google.com/")

    End Sub

[Jolo]

Jeg fikk den ikke til. Bruker VB6.0 vist der har noe å si.

[aadnk]

Jeg fikk den ikke til. Bruker VB6.0 vist der har noe å si.

8584915[/snapback]

Ja, det har så absolutt noe å si. Koden for dette i VB6 er som følger:

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

Const SW_SHOWNORMAL = 1

Private Sub Command1_Click()

    ShellExecute Me.hwnd, vbNullString, "http://www.google.com/", vbNullString, "C:\", SW_SHOWNORMAL

End Sub

[Jolo]

Får det enda ikke till. Hvor skal jeg skrive den kommandoen?

[aadnk]

Får det enda ikke till. Hvor skal jeg skrive den kommandoen?

8588224[/snapback]

Gjør som følger:

• Lag en ny form (eller bruk din eksisterende).
  
• Lag en kommandoknapp.
  
• Dobbelklikk på knappen.
  
• Fjern alt i kodevinduet foruten Option Explicit (om den er synlig).
  
• Lim inn koden ovenfor helt øverst, men før Option Explicit.
  
• Kjør programmet med F5.
  
• Skaff deg en VB-bok!
  

Endret 11. mai 2007 av aadnk

[Jolo]

 

Se på det bilde.

 

Er det noe galt med den?

[aadnk]

Er det noe galt med den?

8589627[/snapback]

"Fjern alt i kodevinduet foruten Option Explicit (om den er synlig)."

 

Du skal derfor fjerne ALT før du legger inn koden jeg gav deg. Dette er fordi Private Declare-linjen IKKE kan plasseres etter en prosedyre.

[Jolo]

Fikk det til nå.