Previamente deves generar la base de datos en access.Este codigo te va ayudar a ver comos e carga.Echale un vistazo de paso si encuentras algun error avidsa
<!-- definimos el lenguaje a utilizar -->
<%@ Language="VBScript" %>
<html>
<head>
<title>Ingreso de Datos</title>
</head>
<!-- comienza el script -->
<%
'definimos la variable de conexion
Dim Conexion,Tabla
Set Conexion = Server.CreateObject("ADODB.Connection")
Set Tabla = Server.CreateObject("ADODB.Recordset")
'conectamos a la base de datos mediante OLE ODBC dando el Driver
Conexion.Open "Driver={Microsoft Access Driver (*.mdb)}; " & "Dbq=" & Server.MapPath("base.mdb")
'definimos la variable de carga de datos
Dim Temp
'buscamos los datos
Temp="Select * From Tabla1 Where UCase(Nombre de la Empresa)='" & UCase(Request("Dato1")) & "' And UCase(Nombre Contacto)='" & UCase(Request("Dato2")) & "' And UCase(Direccion)='" & UCase(Request("Dato3")) & "' And UCase(Telefono)='" & UCase(Request("Dato4")) & "' And UCase(Interno)='" & UCase(Request("Dato5")) & "' And UCase(Fax)='" & UCase(Request("Dato6")) & "' And UCase(Celular)='" & UCase(Request("Dato7")) & "' And UCase(E-mail)='" & UCase(Request("Dato8")) & "' And UCase(Pal)='" & UCase(Request("Dato9")) & "'"
Tabla.Open Temp,Conexion,2,3,1
'si no se repiten agregamos los datos a nuestro buscador
If Tabla.BOF And Tabla.EOF Then
Tabla.AddNew
Tabla("Nombre de la Empresa") = Request("Dato1")
Tabla("Nombre Contacto") = Request("Dato2")
Tabla("Direccion") = Request("Dato3")
Tabla("Telefono") = Request("Dato4")
Tabla("Interno") = Request("Dato5")
Tabla("Fax") = Request("Dato6")
Tabla("Celular") = Request("Dato7")
Tabla("E-mail") = Request("Dato8")
Tabla("Pal") = Request("Dato9")
Tabla.Update
'fin del Script
%>
<font face="Tahoma" size="2"><b><i>Ingreso de datos completado</i></b></font></p>
<%
'si el campo ya existe para no hacer dobles nos da este mensaje
Else
Response.Write "El registro ya existe"
End If
'cerramos la conexion
Tabla.Close
Conexion.Close
%>
<p align="center"><font face="Tahoma" size="2"><b><i>Buscador Web 2006</i></b></font></p>
<p align="center"><font face="Tahoma" size="2"><b><i><a href="ingreso.htm" target="_top">Ingresar
Nuevo</a></i></b></font></p>
</body>
</html>
