Read data from Microsoft Access

Hi,

I want to read data from Microsoft Access database. I want to know which is the connector i should use to access data.

Subject: Read data from Microsoft Access

Hi Shradha,

i am giving sample agent to get the MAccess Data…try with this…

Options

Option Public

Uselsx “*lsxODBC”

Sub Initialize

On Error Goto errorhandler



Dim session As New NotesSession

Dim doc As NotesDocument



Set doc=session.DocumentContext



Dim connection As New ODBCConnection

Dim qry As New ODBCQuery

Dim insertqry As New ODBCQuery

Dim result As  New ODBCResultSet

Dim insqry As String

	connection.ConnectTo("employee")

	

Set qry.Connection=connection	

qry.SQL="select * from empdetails"



	Set result.Query=qry

result.execute

Print "<table border=1 bgcolor='white'>"

Print "<tr><td>StudentName</td><td>RollNum</td><td>Address</td><td>PhoneNum</td></tr>"

Do

	result.NextRow

	empname = result.GetValue("empname",empname)

	empid = result.GetValue("empid",empid)

	empsalary=result.GetValue("empsalary",empsalary)

	

	

	

	Print "<tr><td>" & empname & "</td><td>"

	Print empid & "</td><td>"

	Print empsalary & "</td><td>"

’ Print “

Loop Until result.IsEndOfData

Print "</table>"



connection.Disconnect	



Exit Sub

errorhandler:

Print "Error is" & Error() & "Error At " & Erl &" Error initialize"

End Sub