AHORA TENGO ESTE ERROR ALGUIIEN SABE QUE MAS DEBO TENER INSTALADO ... APARTE DEL IIS POR QUE LES JURO QUE HUBO UN MOMENTO EN QUE ME FUNCIONO UNA ACTUALIZACION A LA BASE DE DATOS ... LO QUE SUCEDE ES QUE TENIA EL SERVIDOR APACHE MONTADO,,,,, LO DESINSTALE Y CREO QUE ENTRE TANTAS COSAS QUE DESISTALE ... DEBI HABER DESISTANLADO ALGO .. EL CASO ES QUE CUANDO AHORA QUE VOLVI A INSTALAR EL IIS ME APRARECE ESTE ERROR...
Microsoft JET Database Engine (0x80040E09)
Y NO SE QUE HACER .. POR QUE LO QUE TENIA ERA EXACTAMENTE LO QUE NECESITAVA.... Y ESTOY MUY DESESPERADO ...
ALGUIEN POR FAVOR ME PUEDE GUIAR AL RESPECTO ....DE VERDAD QUE HE LEIDO MUCHO ... Y NO QUIERO DESISTIR PERO ESTOY MAMADO DE TANTO OBSTACULO PARA PODER SER AUTODIDACTA....(YA ME DESAHOGUE JEJEJE)
NO SE QUE MAS DEBO TENER INSTALADO ... TODOS LOS EQUIPOS SON WIN XP Y ESTOY PPROBANDOLO COMO LOCAL....
EL CODIGO ERA EL SIGUIENTE...
<html>
<head>
<title>jamesito pruebas</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<%
If Request.Form <> "" Then
Dim DB, TBL
Set DB = Server.CreateObject("ADODB.Connection")
Set TBL = Server.CreateObject("ADODB.RecordSet")
DB.Mode = adModeReadWrite
DB.Open ("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" + Server.MapPath("afiliados.mdb"))
TBL.Open "Afiliados" ,DB, 1, 2
TBL.AddNew
TBL("Nombre") = Request.Form("Nombre")
TBL("Apellido") = Request.Form("Apellido")
TBL("Pais") = Request.Form("Pais")
TBL.Update
TBL.Close
DB.Close
Set DB = Nothing
Set TBL = Nothing
Response.Write "Se a agregado con exito"
else
%>
<form name="form1" method="post" action="agregar.asp">
<p> Nombre
<input type="text" name="Nombre" maxlength="50">
</p>
<p> Apellido
<input type="text" name="Apellido" maxlength="50">
</p>
<p> Pais
<input type="text" name="Pais" maxlength="50">
</p>
<p>
<input type="submit" name="Submit" value="Enviar">
</p>
</form>
<%
End If
%>
</body>
</html>
MUCHAS GRACIAS ....
SALUDOS A MI AMIGO KEV ... QUE ME HA ESTADO AYUDANDO....