>Can anybody help me to get the source program of data manager for visual basic 4.0 or 5.0.
>I have source program of data manager for visual basic 3.0.
>
What source code are you looking for. RDO, DAO...
Can you be more specific.

This is a example from the Help of VB5.0
This example shows the value of the EditMode property under various conditions. The EditModeOutput function is required for this procedure to run.

Sub EditModeX()

Dim dbsNorthwind As Database
Dim rstEmployees As Recordset

Set dbsNorthwind = OpenDatabase("Northwind.mdb")
Set rstEmployees = _
dbsNorthwind.OpenRecordset("Employees", _
dbOpenDynaset)

' Show the EditMode property under different editing
' states.
With rstEmployees
EditModeOutput "Before any Edit or AddNew:", .EditMode
.Edit
EditModeOutput "After Edit:", .EditMode
.Update
EditModeOutput "After Update:", .EditMode

.AddNew
EditModeOutput "After AddNew:", .EditMode
.CancelUpdate
EditModeOutput "After CancelUpdate:", .EditMode
.Close
End With

dbsNorthwind.Close

End Sub

Function EditModeOutput(strTemp As String, _
intEditMode As Integer)

' Print report based on the value of the EditMode
' property.
Debug.Print strTemp
Debug.Print " EditMode = ";

Select Case intEditMode
Case dbEditNone
Debug.Print "dbEditNone"

Case dbEditInProgress
Debug.Print "dbEditInProgress"
Case dbEditAdd
Debug.Print "dbEditAdd"
End Select

End Function