|
|
 |
| Visual Basic 2005 Basics If you are new to Visual Basic programming with version 2005, this is the place to start your questions. For questions about the book:
Beginning Visual Basic 2005 by Thearon Willis and Bryan Newsome, ISBN: 0-7645-7401-9 please, use this forum instead. |
Welcome to the p2p.wrox.com Forums.
You are currently viewing the Visual Basic 2005 Basics section of the Wrox p2p Programmer to Programmer discussion community. This is a community of more than 40,000 computer programmers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining our free Wrox p2p community you can post your own programming questions and respond to other programmers’ questions. Registered users also don't have to see the ads that are displayed to guests. Registration is fast, simple and absolutely free so please, join today!
Join today and post to win prizes! Post more to increase your chances of being Wrox’s top poster of the month.
|
 |

February 8th, 2007, 01:25 AM
|
|
Registered User
|
|
Join Date: Feb 2007
Location: faridabad, haryana, India.
Posts: 2
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
visual basic 2005
I want to connect my database in ms-access to vb 2005 and also want to show the first record..can u please tell me how can i do it...
|

February 9th, 2007, 09:59 PM
|
|
Registered User
|
|
Join Date: Feb 2007
Location: Hyderabad, Andhra Pradesh, India.
Posts: 2
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
Hi nidhigupta001,
I'm a learner. The below sample code might help you in connecting Access through VB.
N regarding displaying the first record, Its all how you want to retrieve the table in the .mdb and use accordingly as the database may hold any N number of tables.
Correct me if I'm wrong.
------------------------------------
Public con As New ADODB.Connection
Public rs As New ADODB.Recordset
Private Sub ConTest_Click()
Dim con As New ADODB.Connection
' rs is the record set
Dim rs As New ADODB.Recordset
' the (source=) is the path of the database
con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\ConnectionTest\EmpInfo.mdb;Persist Security Info=False"
End Sub
Aspire Inspire Achieve
|

February 11th, 2007, 04:06 PM
|
|
Authorized User
|
|
Join Date: Aug 2006
Location: Charlotte, NC, USA.
Posts: 21
Thanks: 0
Thanked 0 Times in 0 Posts
|
|
You can also try this:
Dim myCommand as new OledbCommand
Dim myConnection as new OledbConnection([Connection String])
myCommand.Connection = myConnection
myCommand.CommandText = [SQL string]
myCommand.Connection.Open()
myCommand.[command type]
myCommand.Connection.Close()
There are a few tricks to connecting to an Access Database. You need to know the connection string, you can locate the connection string at www.Connectionstrings.com. Older versions of Access use the Jet engine, which will need to be stated in the connection string, as nadhan_f showed in the con.Open line, while Access 07 uses a different engine.
The command text needs to show the sql string that you are going to execute (ie "Select * from sto_Employees")
The command type will tell the application what to run, some examples are:
ExecuteQuery - used for select queries
ExecuteNonQuery - used for insert, update and delete queries
ExecuteReader - used to run a data reader
What command type you use will depend on what you are trying to do.
Hope this helps.
Only two things are infinite, the universe and human stupidity, and I'm not sure about the former.
Albert Einstein
US (German-born) physicist (1879 - 1955)
|
| Thread Tools |
Search this Thread |
|
|
|
| Display Modes |
Linear Mode
|
Posting Rules
|
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts
HTML code is Off
|
|
|
|
 |