Ir para conteúdo
Fórum Script Brasil

Mu-Capsule

Membros
  • Total de itens

    1
  • Registro em

  • Última visita

Sobre Mu-Capsule

Mu-Capsule's Achievements

0

Reputação

  1. 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.
×
×
  • Criar Novo...