
14/04/2004, 17:28
|
| | 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 |