•
•
•
•
What is DaniWeb IT Discussion Community?
You're currently browsing the Visual Basic 4 / 5 / 6 section within the Software Development category of DaniWeb, a massive community of 397,846 software developers, web developers, Internet marketers, and tech gurus who are all enthusiastic about making contacts, networking, and learning from each other. In fact, there are 2,437 IT professionals currently interacting right now! Registration is free, only takes a minute and lets you enjoy all of the interactive features of the site.
Please support our Visual Basic 4 / 5 / 6 advertiser:
Views: 1888 | Replies: 6
![]() |
Hi,
Get Connection String here:
http://www.connectionstrings.com/?carrier=access
Change the Path to Server Path.
Regards
Veena
Get Connection String here:
http://www.connectionstrings.com/?carrier=access
Change the Path to Server Path.
Regards
Veena
'using connection object
'in general section
dim conn as adodb.connection
dim rs as adodb.recordset
'in form load
set conn=new adodb.connection
set rs=new adodb.recordset
conn="provider=microsoft jet.4.0.oledb;data source=<ur database name>;persist security info=false"
conn.open
rs.open "select *from ur tablename",conn,adopendynamic,adlockoptimistic
'in general section
dim conn as adodb.connection
dim rs as adodb.recordset
'in form load
set conn=new adodb.connection
set rs=new adodb.recordset
conn="provider=microsoft jet.4.0.oledb;data source=<ur database name>;persist security info=false"
conn.open
rs.open "select *from ur tablename",conn,adopendynamic,adlockoptimistic
Hi,,
Add "Microsoft ActiveX objects 2.0" References to the project. Share the Folder in Server With Full Access.
use this code:
Dim rs As New ADODB.Recordset
Dim AC As New ADODB.Connection
With AC
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\ServerName\ShareFolder\db1.mdb;Persist Security Info=False"
.Open
End With
ssql = "Select * from MyTable"
Set rs=Nothing
RS.Open ssql,AC
REgards
Veena
Add "Microsoft ActiveX objects 2.0" References to the project. Share the Folder in Server With Full Access.
use this code:
Dim rs As New ADODB.Recordset
Dim AC As New ADODB.Connection
With AC
.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\ServerName\ShareFolder\db1.mdb;Persist Security Info=False"
.Open
End With
ssql = "Select * from MyTable"
Set rs=Nothing
RS.Open ssql,AC
REgards
Veena
![]() |
•
•
•
•
Currently Active Users Viewing This Thread: 1 (0 members and 1 guests)
•
•
•
•
•
•
•
•
DaniWeb Visual Basic 4 / 5 / 6 Marketplace
•
•
•
•
access activation adsl adsl1 adsl2 adsl2+ api blogger blogging blogs broadband cable code combo connection dani daniweb data data transfer development dreamweaver dropdownlist gdata google hardware html innovation internet key linux microsoft module net news openbsd product programming reuse rss second serial storage tags vista web wikipedia wysiwyg xml 240000
- VB6 and MS Access Problem (Visual Basic 4 / 5 / 6)
- MS Access and other applications on VB6.0 (Visual Basic 4 / 5 / 6)
- VB6 Access error Please Please Help !!! (Visual Basic 4 / 5 / 6)
- Pls help me regarding to access database in vb6 (Visual Basic 4 / 5 / 6)
- Change Access Title in VB6 (Visual Basic 4 / 5 / 6)
- VB6 and MS Access 2002 (Visual Basic 4 / 5 / 6)
Other Threads in the Visual Basic 4 / 5 / 6 Forum
- Previous Thread: .:: Web Login Help ::.
- Next Thread: sending mails using Visual Basic 6


Linear Mode