نمايش پست تنها
قديمي ۰۷-۲۶-۱۳۸۷, ۱۱:۱۵ بعد از ظهر   #155 (لینک دائم)
mjanbazi
عضو فوق فعال
 
آواتار mjanbazi
 
تاريخ عضويت: شهريور ۱۳۸۷
پست ها: 21
تشكرها: 2
0 تشكر در 0 پست
پيش فرض

نقل قول:
نوشته اصلي بوسيله 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
mjanbazi آفلاين است   پاسخ با نقل قول