Cómo utilizar DW para crear el diseño de mensajes de un sitio web

gt;

Explica el código anterior:

lt; Este es el inicio del programa ASP

set conn=server.createobject ("adodb.connection") Creó un objeto para conectarse a la base de datos en el servidor

connstr="Provider=Microsoft.jet.oledb.4.0;data source="amp; server.mappath("data. mdb") le dice a ASP el método de conexión y la ruta a la base de datos

conn.open connstr Después de crear el objeto, se utiliza para abrir la base de datos para la conexión

gt; ¡Todo está bien! Finalice el programa ASP

Guarde el código anterior como un archivo conn.asp y colóquelo en el directorio del servidor. ¿Qué te parece, sencillo? Al principio, no entendía la conexión de la base de datos, pero poco a poco la entendí~~

Cuatro Cómo hacer la página de inicio del libro de visitas

Ya hemos conectado la base de datos, así que necesitamos hacerlo. Deje que desempeñe un papel aquí. Esta sección describirá cómo leer los datos en la base de datos usando ASP y mostrarlos en la página, lo que equivale a ver el libro de visitas.

Utilice DW para crear la siguiente página (no hablaré sobre cómo hacer esta página aquí, daré el código HTML para descargar al final)

Guarde el archivo creado como índice .asp, creemos un conjunto de registros de datos para mostrar los datos de la base de datos en esta página:

Abra index.asp con el Bloc de notas y agregue el siguiente código al encabezado:

lt; @LANGUAGE="VBScript" codepage="936"gt;

lt;!--#include file="conn.asp"--gt; /p>

set rs=server.createobject("adodb.recordset")

sql="seleccione usuario, qq, correo electrónico, contenido, datos del pedido principal por id desc"

rs.open sql, conn, 1, 1

gt;

Cuadro de copia de código

lt; @LANGUAGE="VBScript" codepage=" 936"gt;

lt;!--#include file="conn.asp"--gt;

lt;

set rs=servidor. createobject("adodb.recordset")

sql="seleccione usuario, qq, correo electrónico, contenido, datos del pedido principal por id desc"

rs.open sql, conn, 1 , 1

gt;

Explique:

La primera línea indica que ASP usa script VB

La segunda línea, Use include para incluir archivos, y lo que se incluye aquí es el archivo de conexión de la base de datos.

La tercera línea, inicia el programa ASP

La cuarta línea, utiliza el objeto integrado del Servidor para crear un conjunto de registros

La quinta línea, el Declaración SQL, aquí significa Seleccione los campos de usuario, qq, correo electrónico, contenido y datos en la base de datos, y especifique que el nombre de la tabla de datos es "principal" y el orden de los datos es el orden inverso.

En la sexta línea, abra la base de datos con el conjunto de registros llamado rs recién creado y establezca el atributo en solo lectura (1, 1 son datos de solo lectura, 1, 3 son datos de inserción, 2 , 3 son datos de modificación.

Esto abrirá la base de datos y luego se podrá mostrar.

Reemplace el "mensaje por" con "lt;=rs("usuario"). gt;

p>

"Hora" se reemplaza por "lt;=rs("data")gt;

"El contenido del mensaje está aquí" se reemplaza por "lt ;=rs("content")gt;

"QQ" enlaza a:/cgi-bin/friend/user_show_info?ln=lt;;=rs("qq")gt

Enlaces "Enviar correo" a: mailtlt; =rs("email")gt;

Finalmente, agregue el enlace "completar el mensaje" add.asp y el enlace "administrar mensaje". asp

Está bien, guárdelo nuevamente y examínelo.

¿Qué pasa? ¡Resulta que agregamos dos registros a la base de datos! , solo hay un registro porque no lo especificamos.

Agregue una línea después del código ahora

lt; do while not rs.eofgt

Y agregue < al final de la primera tabla en el página /p>

lt;

rs.movext

loop

gt

El código anterior significa usar rs para grabar El puntero de configuración se mueve hacia abajo uno por uno hasta el final. Bucle significa bucle. . Jaja, explora este archivo nuevamente

Esto permitirá que todos los datos de la base de datos se muestren en la página.

5. Cree una página de mensajes y realice la función de mensajes.

Estamos creando un libro de visitas, por lo que es muy importante realizar la función de mensajes, de lo contrario no se incluirá en el. libro de visitas. A continuación, implementemos esta función juntos.

Utilice DW para crear la siguiente página:

Establezca las propiedades del formulario de la siguiente manera:

Nombre: Establezca como un campo de texto de una sola línea con el nombre "usuario"

p>

Número QQ: establecido como un campo de texto de una sola línea, llamado "qq"

Correo: establecido como un campo de texto de una sola línea, llamado "correo electrónico"

Contenido: Establecer como campo de texto de varias líneas, llamado "contenido"

Finalmente, apunte la acción "Acción" del formulario a Addsave.asp.

Guarda el documento como add.asp, ¡OK! ¡Siguiente paso!

El formulario está listo, pero aún necesita el soporte del programa en segundo plano. Usemos ASP para escribir un programa de procesamiento de mensajes y agregar el código del mensaje:

lt; "VBScript " codepage="936"gt; Indica que ASP usa script VB

lt;!--#include file="conn.asp"--gt; Utilice include para incluir el archivo, ¿qué es? aquí se incluye el archivo de conexión de la base de datos

lt

set rs=server.createobject("adodb.recordset") Utilice el objeto integrado del servidor para crear un conjunto de registros

sql="select user, qq, email, content, data from main" Declaración SQL, explicación detallada en la sección anterior

rs.open sql, conn, 1, 3 Abra la base de datos con el conjunto de registros llamado rs recién creado. Establezca el atributo para insertar datos

rs.addnew Utilice el conjunto de registros para agregar un nuevo dato

user=request.form("user") Solicitar variable de formulario, defina la variable como usuario, aquí request.form significa solicitar formulario

qq=request.form("qq") Solicitar variable de formulario, defina la variable como qq, aquí request.form significa solicitud form

email=request.form("email") variable del formulario de solicitud, defina la variable como correo electrónico, aquí request.form significa formulario de solicitud

content=request.form( "content") variable del formulario de solicitud, defina la variable como contenido, donde request.form significa formulario de solicitud

rs("user")=user transfiere el valor del formulario solicitado al nombre del campo de usuario en el conjunto de registros

rs("qq")=qq Pasa el valor del formulario solicitado al nombre del campo qq en el conjunto de registros

rs("email")=email Pasa el valor del formulario solicitado al registro Representa centralmente el nombre del campo de correo electrónico

rs("content")=content Pasa el valor del formulario solicitado al nombre del conjunto de registros que representa el campo de contenido

rs.update Actualiza los datos de la base de datos.

rs.close Cerrar el conjunto de registros

set rs=nothing Destruir el conjunto de registros

conn.close Cerrar la conexión a la base de datos

set rs= nada Destruir la conexión de la base de datos

gt;

Cuadro de copia de código

lt; @LANGUAGE="VBScript" codepage="936"gt; que ASP está usando script VB

lt;!--#include file="conn.asp"--gt; Utilice include para incluir el archivo, y lo que se incluye aquí es el archivo de conexión de la base de datos

lt;

set rs=server.createobject("adodb.recordset") Utilice el objeto integrado del servidor para crear un conjunto de registros

sql="select user , qq, correo electrónico, contenido, datos de la declaración SQL principal, explicación detallada en la sección anterior

rs.open sql, conn, 1, 3 Abra la base de datos con el conjunto de registros llamado rs recién creado y establezca las propiedades para insertar datos

rs .addnew agrega un nuevo dato usando el conjunto de registros

user=request.form("user") Solicite la variable del formulario, defina la variable como usuario, aquí request.form significa formulario de solicitud

qq=request.form("qq") Variable del formulario de solicitud, defina la variable como qq, aquí request.form significa formulario de solicitud

email=request.form("email") Formulario de solicitud La variable del formulario de solicitud, defina la variable como correo electrónico, aquí request.form significa formulario de solicitud

content=request.form("content") La variable del formulario de solicitud, defina la variable como contenido, aquí request.form significa solicitud. El significado del formulario

rs("user")=user pasará el valor del formulario solicitado al nombre del campo de usuario en el conjunto de registros

rs("qq")=qq solicitará Pase el valor del formulario solicitado al nombre del campo qq en el conjunto de registros

rs("email")= email Pasa el valor del formulario solicitado al nombre del campo de correo electrónico en el conjunto de registros

rs("content")=content pasa el valor del formulario solicitado al nombre del campo de contenido en el conjunto de registros

rs.update actualiza los datos en la base de datos.

rs.close cierra el conjunto de registros

set rs=nada destruye el conjunto de registros

conn.close cierra la conexión a la base de datos

set rs= nada Destruye la conexión de la base de datos

gt;

Guarda el archivo anterior como addave.asp y pruébalo. ¿Eh? ¿Por qué aparecen espacios en blanco después de completar y enviar? Esto se debe a que no hay una página de redirección configurada en addave.asp después de que los datos se envíen correctamente. No hay necesidad de hacer nada complicado aquí. Simplemente actualice la página y agregue:

lt; ="refresh" content="2; URL=index.asp"gt;

Luego agregue información rápida a la página, como por ejemplo: "Su mensaje se envió correctamente. En 2 segundos regresará automáticamente". a la página de inicio del libro de visitas."

Bien, esta función de mensaje finalmente está implementada. Finalmente, pruébala y observa el efecto.

¡Vale!

6. Crear una página de inicio de sesión de administración

La función de administración del libro de visitas es evidente para el libro de visitas. La función de inicio de sesión del foro es un buen ejemplo, pero básicamente, es así. Es suficiente hacer un libro de visitas con una función de eliminación. Este tutorial está escrito para que más principiantes en ASP puedan comprender mejor ASP, por lo que está destinado a aprender. Por supuesto, también puede agregar más funciones sobre esta base, como responder mensajes. . OMS.

Bien, comencemos. Utilice Dreamweaver para crear una página de inicio de sesión como antes, como se muestra a continuación:

Establezca el nombre del formulario del nombre de usuario en admin y establezca el nombre del formulario de. la contraseña a admin. Para la contraseña, apunte la acción a checkpass.asp y guarde admin.asp como la página de inicio de sesión.

El siguiente es el programa ASP para detectar la contraseña.

lt;!--#include file="conn.asp"--gt; Incluye conn.asp para conectarse a la base de datos

lt inicio ASP

contraseña=request.form("contraseña") define el valor de admin como el nombre de usuario y el nombre de dominio pasados ​​desde el formulario admin

si admin="" o contraseña="" entonces esta oración significa que si no se ingresan el nombre de usuario y la contraseña, ejecute la siguiente oración

response.Write("lt; script language=javascriptgt;alert(¡llene el formulario completo!);history.go(-1)lt;/scriptgt;") Utilice el script javascript para avisar al usuario

end if end if

sql="select * from admin where admin="amp;adminamp;" and password="amp;passwordamp;"" Esta oración es muy importante. hablaremos de ello más adelante

set rs=conn.execute( sql) Establece el registro set rs y usa conn para ejecutar la instrucción SQL

si rs.eof o rs.bof luego, cuando no se cumpla el resultado del filtro, ejecute la siguiente oración

response. write "lt;script language=javascriptgt;"

response.write "alert(¡Usuario o contraseña incorrectos! );"

response.write "javascript：history.go(-1 );"

response.write "lt;/scriptgt;" Utilice un script javascript para avisar al usuario

de lo contrario, si se cumplen las condiciones

session("admin" )=admin Crea una nueva sesión, el valor es igual al nombre de usuario pasado en el formulario

response.redirect "mymanage.asp" Vaya a mymanage.asp e ingrese a la página de administración

end if Finalice la declaración if

gt fin

Cuadro de copia de código

lt;!--#include file="conn.asp"--gt; Poner conn.asp Incluido para conectarse a la base de datos

lt; /p>

admin=request.form("admin") Defina el valor de admin como el nombre de usuario y el nombre de dominio que admin pasó desde el formulario

contraseña=request.form("contraseña" ) define el valor de admin como el nombre de usuario y el nombre de dominio que admin pasa desde el formulario

p>if admin="" o contraseña="" entonces Esta oración significa que si no se ingresan el nombre de usuario y la contraseña, se ejecutará la siguiente oración

response.Write("lt;lenguaje de script =javascriptgt;alert( ¡Complételo completamente!); History.go(-1)lt;/scriptgt;") Utilice el script javascript para solicitar al usuario

end if end if

sql="select * from admin donde admin="amp;adminamp;" and password="amp;passwordamp;"" Esta oración es muy importante, hablaremos de ella más adelante

set rs =conn.execute(sql) Establece el conjunto de registros rs, usa conn para ejecutar la instrucción SQL

si rs.eof o rs.bof, cuando no se cumpla el resultado del filtro, ejecuta la siguiente oración

response.write "lt; lenguaje de script =javascriptgt;"

response.write "alerta(¡Usuario o contraseña incorrectos!);"

response.write "javascript: History.go(-1);"

response.write "lt;/scriptgt;" Utilice un script javascript para avisar al usuario

else si se cumplen las condiciones

session("admin")=admin crea una nueva sesión. El valor es igual al nombre de usuario pasado en el formulario

response.redirect "mymanage.asp" redirige a mymanage.asp y entra la página de administración

end if finaliza la declaración if

gt; ASP termina

Guarde el código anterior como checkpass.asp

En De esta manera, después de que el usuario ingresa el nombre de usuario y la contraseña en la página admin.asp, los valores de nombre de usuario y contraseña se pasan al procesamiento de Checkpass.asp, cuando los valores de nombre de usuario y contraseña coinciden con los campos de la base de datos. , se ingresa a la página de administración mymanage.asp y se crea una sesión. Las variables de sesión de esta sesión entrarán en vigor más adelante

7. Hablé sobre crear una página de inicio de sesión y detectar usuarios. Cuando el nombre de usuario y la contraseña sean correctos, irá a la página de administración. Bien, comencemos a implementarlo.

De hecho, la página de administración de este libro de visitas no es muy diferente de la página de inicio que los usuarios ven directamente. Solo usa variables de sesión para protección y agrega un enlace de eliminación. Cuando se hace clic en este enlace, aparecerá este mensaje. se eliminará automáticamente. Bien, ahora que se conoce el propósito, ¡vamos!

Como acabo de decir, esta página es similar al index.asp de la página de inicio, así que cópielo primero y luego cámbielo.

Primero busque la siguiente oración:

sql="seleccione usuario, qq, correo electrónico, contenido, datos del pedido principal por id desc"

Cámbielo a

sql="seleccione id, usuario, qq , email, contenido, datos de principal ordenar por id desc"

De esta forma se selecciona el valor de numeración automática de id para que se pueda bloquear el id al eliminar el mensaje.

Luego agregue un enlace "Eliminar" después del enlace "Correo", enlace: del.asp?id=lt;=rs("id"), modifique el código a lt;a href=" del .asp?id=lt;=rs("id")gt;" onclick="return confirm(¿Está seguro de eliminar este mensaje?);"gt;deletelt;/agt; De esta manera, eliminaremos esta página Más tarde, cuando lo hagas, ¡sabrás por qué!

Después de la modificación, guárdelo como mymanage.asp

¡Ahora abra el navegador y eche un vistazo!

¿Cómo puedo ingresar sin ingresar mi usuario y contraseña? No se preocupe, en la sección anterior no creamos una variable de sesión. Ahora resulta útil. Simplemente ábrala con el Bloc de notas. Al final de la oración lt;@LANGUAGE="VBScript" codepage="936"gt; agregue lt;if session("admin")lt;gt;"" thengt; y escriba al final:

lt;

else

response.Redirect("admin.asp")

end ifgt

Siguiente Explícalo.

lt; if session ("admin")lt; gt; "" thengt; Es decir, si el valor de session ("admin") no está vacío, se ejecutará.

lt;

else

response.Redirect("admin.asp")

end ifgt; para iniciar sesión en la página, inicie sesión nuevamente; en este caso, si ingresa directamente la URL, saltará a admin.asp.

8. Eliminar el mensaje

En la sección anterior agregamos un enlace para eliminar el mensaje. El siguiente es el código de del.asp

lt; !--# include file="conn.asp"--gt;

lt

set rs=server.createobject("adodb.recordset")

id= Request.QueryString("id")

sql="select * from main donde id="amp id

rs.open sql, conn, 2, 3;

rs.delete

rs.update

gt;

Es obvio, son solo unas pocas oraciones y no lo hago. Te necesito en las oraciones 1, 2 y 3 explicadas.

Oración 4:

id=Request.QueryString("id") Utilice id para obtener la identificación pasada en la cadena. Mire nuevamente el enlace eliminado: del.asp? =lt;=rs("id")gt; Es este enlace el que transmite el valor de id. lt;=rs("id")gt;

Oración 5:

Utilice SQL para definir declaraciones SQL. El * aquí es un carácter comodín, que significa todo, y el significado es un poco como "cuándo". de la oración completa Selecciona todos los campos de la tabla llamada principal. Su condición es que el campo de identificación en la base de datos sea la identificación pasada por la cadena. Si no tienes esto, no importa si no lo entiendes por un tiempo. Lo entenderás después de que lo conozcas.

La sexta oración es abrir el registro que cumple con las condiciones. Para ser precisos, no debe llamarse conjunto de registros, porque después de filtrarlo así, definitivamente habrá un registro 2. 3 especifica que se pueden ingresar los datos en la base de datos.

Oraciones 7 y 8

Después de leer rs.delete, comprenderá que esta es la esencia de todo el programa, que consiste en realizar la eliminación.

rs.update Esto es para actualizar la tabla en la base de datos. Se actualizará después de la eliminación.

Se liberan rs.close y conn.close.

Anoté todos los pasos~~~