Thank You for the Information. However, I created this code so far but i dont know why isn't working, here's my code:
Dim strSql As String
strSql = "INSERT INTO OpenDataSource('Microsoft.Jet.OLEDB.4.0','Data Source=" & App.Path & "\Extract.MDB;')...[Sam_Timedata] ([EmployeeID],[Pin],[Timedata],[Count],[InOut],[strEmployeeID]) " & _
"SELECT EmployeeID, Pin, Timedata, Count, InOut, strEmployeeID From dbo.Timedata;"
adCon.Execute strSql (FYI: adCon is my SQL Server Connection)
The Error say's "OLE/DB provider returned msg"Microsoft.Jet.OLEDB.4.0','Data Source=" & App.Path & "\Extract.MDB' is not a valid path. Make sure that the path name is spelled correctly and that your are connected to the server on which the files resides."
but actually, when i checked the path it was correct and I dont know what the system means about this,.. Any Advise. thank you.