13/05/09 19:34
LittleHacker
Salve a tutti vorrei realizzare un programma che mi apra una pagina web qunado riceve un'input dal client(è un'applicazione client/server).
Allora il client l'ho creato con vb.net e il server con vb6(per comodità allora per il client inserisco questo codice:
Dim Bytes() As Byte = System.Text.ASCIIEncoding.ASCII.GetBytes("OpenURL" & InputBox("Inserisci URL:", "Apri URL", "")
NetStr.Write(Bytes, 0, Bytes.Length)
Ma per il server??
Ho provato così:
Dim Data As String
wskServer.GetData Data
Select Case Data
Case "OpenURL"
Dim shell As Object
Set shell = CreateObject("shell.application"
shell.open Data
End Select
Ma non va...Mi date una mano .....
Allora il client l'ho creato con vb.net e il server con vb6(per comodità allora per il client inserisco questo codice:
Dim Bytes() As Byte = System.Text.ASCIIEncoding.ASCII.GetBytes("OpenURL" & InputBox("Inserisci URL:", "Apri URL", "")
NetStr.Write(Bytes, 0, Bytes.Length)
Ma per il server??
Ho provato così:
Dim Data As String
wskServer.GetData Data
Select Case Data
Case "OpenURL"
Dim shell As Object
Set shell = CreateObject("shell.application"
shell.open Data
End Select
Ma non va...Mi date una mano .....
aaa