使用 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