VB6 with Access in Local Network (LAN)

[gibra]

I see some programms.. that working properly and it use same exe for node and server... its working same speed in node and server... how can i write an same exe for node and server.

I have made programs VB6.0 + Access (database) that run for years in multi-user (LAN and Terminal Server) without any problem. Some even with 15 concurrent users.
My suggestions here:

1)
This problem is due to cache updating, that in JET has been changed. The default time refresh occur each 5 minutes.
Therefore, if you read data immediately after updating, the data seem no changed.

You need to force the refresh of the cache after each UPDATE or INSERT SQL command (or ADODB.Recordset Update methods, also):

    ' note that Microsoft Jet And Replication Objects Library 2.6 need installed.
    ' library file: MSJRO.DLL (however already installed on most of systems)
    '
    ' CN is the ADODB.Connection 

    Dim Jet As Object
    On Error Resume Next
    Set Jet = CreateObject("JRO.JetEngine")
    If Not Jet Is Nothing Then
         Jet.RefreshCache CN
    End If

After refresh cache, you get the updated data immediately.
I.e., to get the ID set as counter field (Autoincrement) for last added record:

First use the above code, then inquire to get the new ID 
Set rs = CN.Execute ("SELECT @@IDENTITY AS newID FROM MyTable")

2) you do not need to use Winsock to access the data.


3) In multi-user environment it is necessary to implement a strong control about concurrency. See:
Using Optimistic Concurrency
http://msdn.microsoft.com/en-us/libr...cz(VS.80).aspx


4) Wher INSER or UPDATE data, use always Transactions!!!


5) Compact and Backup database every day.


You can downlaod my project that contains a complete application-template (starting from LOGIN) where you can see many of above feature.
I use classes to access database (Get and Save methods)
Unfortunately for you, my page is on italian language, but the source code is VB6.0.
http://nuke.vbcorner.net/Progetti/VB...T/Default.aspx