Здраствуйте.
В Вин2000: shell "net send 127.0.0.1 message" - работает.
Вопрос: как отправить сообщение на ip адрес в Вин98?
Option Explicit
Private Declare Function NetMessageBufferSend Lib "netapi32.dll" (ByVal ServerName As String, ByVal MsgName As String, ByVal FromName As String, Buf As Any, BufLen As Long) As Long
Private Sub Command1_Click()
Dim sName As String, sMsg As String, sBuf As String
Dim lLen As Long, ret As Long
sName = StrConv(txtFrom.Text, vbUnicode)
sMsg = StrConv(txtMsg.Text, vbUnicode)
sBuf = StrConv(txtText.Text, vbUnicode)
lLen = LenB(sBuf)
ret = NetMessageBufferSend(sName, sMsg, sName, ByVal sBuf, ByVal lLen)
End Sub
Попробовал, ничего не помогло. В Вин98 в netapi32.dll NetMessageBufferSend нет!!.mayevskyy писал(а):Всем спасибо, буду пробовать.
alibek писал(а):NetMessageBufferSend - это API для систем NT. В Win95/98/Me его нет.
Сейчас этот форум просматривают: AhrefsBot и гости: 13