No hay ningún mensaje de error y no se puede insertar en la base de datos.
En segundo lugar, observe el código fuente de la página. A veces hay errores pero no se muestran. Pero se puede ver el código fuente.
En tercer lugar, genere algo en el medio. Por ejemplo, genere la declaración SQL para ver si hay algún problema y determinar qué lado está mal. Esto es feo.
No hay problemas al compilar y ejecutar, lo que significa:
1. Hay un problema con su declaración SQL
2.2 proyecto. La declaración SQL no coincide con el contenido de la tabla de la base de datos.
3. El árbol de variables no coincide
4. La longitud del campo obtenido excede el rango de longitud establecido en la base de datos.
Compruébalo tú mismo.
Principalmente tablas de bases de datos y sentencias SQL.
SQL = "seleccione * de gong Qiu donde (la identificación no está vacía)" & lt! -# incluir archivo = " conexión . ASP "-& gt;
<! -# incluir archivo = " conexión 1 . ASP " -& gt;
& lt%
if respuesta cookies(" miembro ") = "verdadero" y solicitud de cookies(. " uid ")<& gt" "Entonces
atenuar uID, stype, describe, lxdh, qq
if Request.form("stype") = " "Entonces< / p>
response.write "<Script>Alert ('¡El tipo no puede estar vacío!');history . back();</Script>"
Response.End
Lo hará end if...
Si request form(" describe 1 ")= " "Entonces
response.write " & ltscript& gtAlert(' ¡El contenido de la información no puede estar vacío! ' ); historial . back(); & lt/Script & gt; "
Respuesta.End
Terminará si...
describe = solicitud formulario(" describir 1 ")
uID =request(" uID ")
tipo=Request.form("tipo ")
describe = solicitud . formulario(" describir 1 ")
Lianxi = solicitud. Formulario("text")
lxdh=Request.form("lxdh ")
qq=Request.form("qq ")
Bajo pedido. form("[Ver]" " ") entonces
[Ver]=1
Terminará si...
Ssss=" "+"Teléfono : "+lxdh
rget=request.
formulario("nombre")
Str=("Nanchang, Shangrao, Ganzhou")
clave=split(cadena, ","")
inum = ubound(key)
para i=0 a inum
si i & lt entonces =inum
if Instr(rget,key(I))& gt ; luego 0
conn 1. ejecutar(" insertar en gon Qiu(uid, estilo, describe1, fecha1, hora1, qq)
valor("& amp request(" uID " )&, ' " & amprequest . formulario(" tipo ")&, ' " & amprequest formulario(" describir 1 ")& , ' " & fecha()&, ' " & amp tiempo () & amp, ' " & formulario de solicitud ("QQ") & amp ')")
Respuesta. Escribe "<script>Alert("¡Publicado exitosamente!"); this . location . href = ' URL . ASP '; </script >"
Terminará si...
Terminará si...
Entonces
otro
responde. end
rs close
set rs = none
finalizará si...
dim sql
establecer rs = servidor. CreateObject("Adodb. Recordset")
SQL = "seleccione * de gongqiu donde (id está vacío)"
Connecticut, 1, 3
rs. addnew
rs("uID")=uID
rs("stype")=stype
rs("describe1")=describe p>
Rs("lxdh")= ",Contacto:"+solicitud. Formulario("texto")+ssss.
rs("vista1")=[vista]
rs("fecha1")=fecha()
rs("hora1")=hora( )
rs("qq")=qq
RS(" IP ")=Solicitud. Variables del servidor ("remote_ADDR")
rs.update
rs off
set rs=none
set rs=server. CreateObject("Adodb.RecordSet")
sql="seleccione uID, fabu del miembro donde uID = ' " & ampuID & amp"
Connecticut, 1, 3 p>
fabu=rs("fabu ")
fabu=fabu+1
rs("fabu")=fabu
rs .Actualizar p>
rs off
Establecer rs = ninguno
Conexión desactivada
establecer conn = nada % & gt
<% Response.cookies("fabu")=fabu
Respuesta.<Script>Alert("¡Publicado correctamente!");esta ubicación .href = 'ASP';& lt/script>"
Otras
respuestas.
write("<script>alert('¡Hola! Esta columna solo puede ser vista por miembros. "¿Es usted miembro?"); this . location . href = ' index . ASP ';</script>" )
Terminará si...
Terminará si...
% & gt