Dear All
I write an Client/Server application use Winsock Control . Side Client I
have a MDI form (frmMain) and MDI child form (frmEmployeeList) , ..
In frmMain I place a Winsock control (wskWinsock) . In Module (mdlGlobal) I
declare an variant type Winsock(g_wskMyWinsock) and in event Form_Load of
frmMain I set g_wskMyWinsock = wskWinsock and I use g_wskMyWinsock in
another form to Send data .
When frmEmployeeList load I send to server request EmployeeList (I define)
and server return records Employee
In event Private Sub wskWinsock_DataArrival(ByVal bytesTotal As Long) I do
that :
lngBytesTotal = bytesTotal
wskSACMS.GetData vntData, vbArray + vbByte
Select Case g_intCurrentForm
Case FRM_EMPLOYEE_LIST
Call frmEmployeeList.OnReceiveData(vntData,bytesTotal)
End Select
OnReceiveData : receive each record Employee and add to grid
My app run good in VB IDE but when I make exe file and run it then error
occur (send ,don't send microsoft ) and terminate .
I don't know why . Please help me resolve problem .thanks
(I am using WindowXP,VB6,VSSP5)
Archived from group: microsoft>public>vb>enterprise