VBcoders Guest



Don't have an account yet? Register
 


Forgot Password?



to connect access with mssqlserver

by Rushabh (2 Submissions)
Category: Databases/Data Access/DAO/ADO
Compatability: VB 6.0
Difficulty: Unknown Difficulty
Originally Published: Thu 4th August 2005
Date Added: Mon 8th February 2021
Rating: (1 Votes)

to connect access with mssqlserver

API Declarations


dim rs as adodb.recordset


Rate to connect access with mssqlserver



'this will help to open this database
data1.databasename = app.path & "\temp.mdb"
data1.refresh
conn.open ""'here add connection string"
rs.open "select * from table",conn,adopenstatic,adlockreadonly
if not(rs.eof and rs.bof) then
      rs.movefirst
      while not rs.eof
           data1.recordset.addnew
               data1.recordset("field1")=rs("field")
               'Likewise enter all fields u want
           data1.recordset.update
      rs.movenext
end if
rs.close
conn.close
set conn=nothing

Download this snippet    Add to My Saved Code

to connect access with mssqlserver Comments

No comments have been posted about to connect access with mssqlserver. Why not be the first to post a comment about to connect access with mssqlserver.

Post your comment

Subject:
Message:
0/1000 characters