使用 vb6 winsock 发送 python 字符串
Send python string using vb6 winsock
我想我不知道 python。这个脚本通过 LAN 发送一个简单的字符串到 LAN 地址(从我的电脑到 python 服务器)
-------------------------------------------------------
import socket
#
host ="192.168.0.17"
port =49280
#
s = socket.socket(socket.AF_INET, socket.SOCK_STREAM)
s.connect((host,port))
#
s.sendall("set MIXER:Current/InCh/Fader/On 1 0 1\n".encode())
s.recv(1500)
s.close
-----------------------------------------------
我想发送相同的字符串,但使用的是 vb6....
--------------------------------------------
Private Sub Command3_Click()
Winsock1.RemoteHost = "192.168.0.17"
Winsock1.RemotePort = 49280
Winsock1.Protocol = sckTCPProtocol
Winsock1.Connect
winsock1
Dim stringa1, stringa As String
Dim Data() As Byte
stringa = "set MIXER:Current/InCh/Fader/On 1 0 1\n"
Data = StrConv(stringa, vbFromUnicode)
Winsock1.SendData Data
End Sub
----------------------------------------------
但不幸的是它不起作用。
使用第一个脚本,我的远程 python 服务器正确响应,使用 vb6 中的脚本,服务器没有任何生命迹象
谁能告诉我我犯了什么错误?感谢所有人和良好的延续
马里奥
基于此table:
https://www.quackit.com/python/reference/python_3_escape_sequences.cfm
a \n
in Python 是一个换行符。所以在 VB6 中是 vbLf
.
所以试着把你的台词改成这样:
stringa = "set MIXER:Current/InCh/Fader/On 1 0 1" & vbLf
我想我不知道 python。这个脚本通过 LAN 发送一个简单的字符串到 LAN 地址(从我的电脑到 python 服务器)
-------------------------------------------------------
import socket
#
host ="192.168.0.17"
port =49280
#
s = socket.socket(socket.AF_INET, socket.SOCK_STREAM)
s.connect((host,port))
#
s.sendall("set MIXER:Current/InCh/Fader/On 1 0 1\n".encode())
s.recv(1500)
s.close
-----------------------------------------------
我想发送相同的字符串,但使用的是 vb6....
--------------------------------------------
Private Sub Command3_Click()
Winsock1.RemoteHost = "192.168.0.17"
Winsock1.RemotePort = 49280
Winsock1.Protocol = sckTCPProtocol
Winsock1.Connect
winsock1
Dim stringa1, stringa As String
Dim Data() As Byte
stringa = "set MIXER:Current/InCh/Fader/On 1 0 1\n"
Data = StrConv(stringa, vbFromUnicode)
Winsock1.SendData Data
End Sub
----------------------------------------------
但不幸的是它不起作用。 使用第一个脚本,我的远程 python 服务器正确响应,使用 vb6 中的脚本,服务器没有任何生命迹象 谁能告诉我我犯了什么错误?感谢所有人和良好的延续 马里奥
基于此table:
https://www.quackit.com/python/reference/python_3_escape_sequences.cfm
a \n
in Python 是一个换行符。所以在 VB6 中是 vbLf
.
所以试着把你的台词改成这样:
stringa = "set MIXER:Current/InCh/Fader/On 1 0 1" & vbLf