WinsockInit should be called first

[مهران رسا]

سلام




Winsock1.RemoteHost = ServerIP
Winsock1.RemotePort = "2022"
Winsock1.Connect

Private Sub Winsock1_Connect()
Winsock1.SendData (TXTPM.Text)
End Sub



دقیقاً عین کد بالا در یک فرم به درستی جواب میده . ولی نمی دونم چرا توی فرم جدید با خطای زیر موجه میشم :



Run-time error '10093':
WinsockInit should be called first


به نظر شما علت چیه ؟ :متفکر:

[scarce]

میشه بیشتر توضیح بدید ؟ ×

[مهران رسا]

بله !
راستش من هیچ وقت به چنین مشکلی در برنامه نویسی تحت شبکه برخورد نکرده بودم .
همونطور که در پست اول مشاهده می کنید یکسری کد برای برقراری ارتباط در یک شبکه Lan نوشته شده که از این کدها در یک فرم برای عملیات Login و در فرم دیگه برای عملیات LogOut استفاده کردم .

مشکل اینجاست که در فرم اول ارتباط بدون هیچ مشکلی و به درسی برقرار میشه ولی در فرم دوم با خطای زیر مواجه میشم و هنوز هم معنای این خطا رو نفهمیدم .



Run-time error '10093':
WinsockInit should be called first

[مهران رسا]

دوستان عزیز روند کار کل یک پروژه به خاطر این مشکل متوقف شده . اگر موردی به ذهنتون میرسه لطفاً بیان کنید .

ممنون

[kuh_nur]

سلام اگه من بیسواد درست متوجه شده باشم شما باید اول یک کنترل از اکتیو ایکس وینشوک(Winsock) رو روی فرم ثانویه پیاده کنین (بزارین) بعد کد ها رو اجرا کنین اگه اشتباه بود ببخشین

[مهران رسا]

نه آخه اگه مشکل این بود اصلاً برنامه کامپایل نمیشد .

کسی نظری نداره ؟

[r0ot$harp]

سلام




Winsock1.RemoteHost = ServerIP
Winsock1.RemotePort = "2022"
Winsock1.Connect

Private Sub Winsock1_Connect()
Winsock1.SendData (TXTPM.Text)
End Sub

دقیقاً عین کد بالا در یک فرم به درستی جواب میده . ولی نمی دونم چرا توی فرم جدید با خطای زیر موجه میشم :



به نظر شما علت چیه ؟ :متفکر:

حاجی به نظر من شما وقتی می خواهید به سرور وصل شین سرور درخواست RequestID رو قبول نمی کنه !!! یا اینکه وقتی قبول کرد سرور اتصال رو قطع کرده . اگه بتونی این قسمت از برنامه رو هم سرور و هم کلاینت رو در اینجا قرار بدی صددرصد می تونم کمکت کنم .




باتشکر احسان