نقل قول:
نوشته اصلي بوسيله r-co
سیاوش تو این نسخه جدید مشکلی وجود داره که اگه برطرف کنی عالی میشه
تو نسخه های قبلی با نوشتن کد پایین بات جواب می داد ولی الان جواب نمی ده
---------------------------------------------------------------------------------
If Left(Message, 6) = "testpm" Then
"Response = "Test Pm Ok
End If
---------------------------------------------------------------------------------
|
rco جان به اینصورت این کارو انجام بده شما sckyahoo.senddata رو نمی زنی معلومه جواب نمی ده باید جوابو براش ارسال کنی این خطو اضافه کن جواب می ده
If Left(Message, 5) = "/
time" Then((Response = "Now Time IS:" & str(Time
( sckYahoo.SendData sendPM(tUser.Text, PersonId, Response)
End If