Dim conn As New OleDbConnection
conn.ConnectionString = "provider=microsoft.jet.oledb.4.0;" & "data source=" & Server.MapPath("friend.mdb") conn
conn.ConnectionString = "provider=microsoft.jet.oledb.4.0;" & "data source=" & Server.MapPath("friend.mdb") conn