Código fuente del cuerpo de la respuesta

Supongamos que la base de datos está conectada, la variable de conexión es conn y el conjunto de datos es RS.

El código fuente del archivo ASP es el siguiente:

-

lt

Dim bodytxt, nombre 'nombre se utiliza para recibir los datos enviados por el formulario.

nombre=trim(request.form("nombre "))

SQL = " seleccionar * de A donde NOMBRE = ' " amp；Nombre amp"

Connecticut, 1, 1

No hacer

bodytxt=rs("body ")

rs.movext

Anillo

rs cerrado

Establecer fso=Servidor. CreateObject(" scripting . objeto del sistema de archivos ")

Establecer fs=fso (" cuerpo . txt "), 2, 1)

fs.write bodytxt

fs.close

Establecer fs = Ninguno

Establecer fso = Ninguno

response.redirect "body.txt "

gt

Es necesario mejorar otras funciones