alguém poderia me ajudar com esse Scrip, sempre que eu tento copilar da erro no .Navigate Dim sIP, WebSite As String
Dim csPorta() As String
Private Sub Form_Load()
Dim lRegion As Long
lRegion = MakeRegion(frmMain, vbWhite)
sIP = "1mu9.no-ip.info"
csPorta() = Split("42305;23405", ";")
WebBrowser1[b][u].Navigate =[/u][/b] "http://1mu9.no-ip.info:8090/launcher/meio.php"
End Sub
Private Sub mini_Click()
Me.WindowState = 1
End Sub
Private Sub x_Click()
End
End Sub
Private Sub Jogar_Click()
Call Shell(App.Path & "\fnc.exe connect /u" & IP & " /p" & csPorta(0), vbNormalFocus)
End
End Sub
Private Sub Opções_Click()
frmOptions.Show 1
End Sub
Private Sub Click()
Dim lRegion As Long
End Sub
Private Sub Sair_Click()
Unload Me
End Sub
Como abrir um programa que se xama Main.exe pelo shell ?
Call Shell(App.Path & "\fnc.exe connect /u" & IP & " /p" & csPorta(0), vbNormalFocus) pois a hora que eu tento abrir da erro nessa linha.