Ver Mensaje Individual
  #1 (permalink)  
Antiguo 14/04/2004, 17:28
Elalux
 
Fecha de Ingreso: enero-2002
Mensajes: 4.159
Antigüedad: 23 años, 3 meses
Puntos: 22
Error al insertar en la Base de Datos

Saludos maestros he aquí mi situación.

Tengo una tabla en access que se llama Noticias con las siguientes colunas:

ID - Encabezado - Resumen - Cuerpo - Foto1 - PieFoto1 - Foto2 -PieFoto2 - Fecha

__________________________________________
Creo una función para hacer la conexión

Function OpenDB()
Dim BD, fs
BD = Server.MapPath("/asp/fundacion.mdb")
Set fs=Server.CreateObject("Scripting.FileSystemObject ")
If (fs.FileExists(BD))=true Then
strConn = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & BD & ";"
Set dbc = Server.CreateObject("ADODB.Connection")
dbc.open strConn
OpenDB = true
Else
OpenDB = false
End If
set fs=nothing
End Function

_____________________________________
Empezamos

OpenDB()
strSQL = "INSERT INTO Noticias (ID, Encabezado, Resumen, Cuerpo, Fecha) "
strSQL = strSQL & "VALUES (" & ID & ", '" & encabezado & "', '" & resumen & "', '" & cuerpo & "', '" & Now & "');"

Set rs = dbc.Execute(strSQL) <--Aqui esta el problema, cuando se ejecuta esta línea me aparece en el navegador la pagina de No encontrada.

La base de datos si existe, de hecho otras paginas que solo leen de la BD muestran la información sin problemas, pero a la hora de ingresar el nuevo registro es cuando falla.

Alguien podria darme algun consejo?

Gracias de Antemano