I wanted to display records from a dbf file through ASP Programm. the code i wrote is as follows :

Function OpenDBFConn(Path)
Dim Conn
Set Conn = CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Path & ";" & _
"Extended Properties=""DBASE IV;"";"
Set OpenDBFConn = Conn
End Function

Dim DBConn
Set DBConn = OpenDBFConn("f:\seaworld")

Dim rs
Set rs = DBConn.Execute("Select * from [address#DBF]")

while not rs.eof
Response.Write (rs(1))&"<br>"


Error Displayed in Browser is :

Error Type:
Microsoft JET Database Engine (0x80004005)
Unspecified error

Kindly solve my query
Thanx in Advance