insertar registros a BD access

[heba80]

hola necesito ayuda urgente
quiero insertar registros a una base de datos en access pero sin la conexion dsn es esto posible.
en una pagina encontre esto: dicen que es la forma de conectarse a access
ACCESS

Dim con As New ADODB.Connection
Dim cadena_DSN As String

cadena_DSN = "Driver={Microsoft Access Driver (*.mdb)};" & _
"Dbq=c:\program files\devstudio\vb\biblio.mdb;" & _
"Uid=Admin; Pwd="

con.Open cadena_DSN

en otra pagina encontre esto:
<%
Set demoConn = Server.CreateObject("ADODB.Connection")
demoFilePath = Server.MapPath("prueba.mdb")
demoConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & demoFilePath & ";"
%>

con cual podre trabajar para insertar registros.