急,如何把这段ASP代码进行修改,我改了几次就是写不进数据库

来源:百度知道 编辑:UC知道 时间:2024/06/21 10:54:31
<!--#include file="conn.asp"-->
<%
edit=trim(request("edit"))
if edit="save" then
response.write "<script language=javascript></script>"
else
set rs = server.CreateObject("adodb.recordset")
sql = "Select * from MB_Member where M_Name='" & session("name") & "'"
rs.open Sql,my_conn,1,1
end if
%><form action=reg_edit.asp method=post name=reg>
<div align="center">
<center>
<table border="1" cellpadding="3" cellspacing="0" width="400" bordercolor="#ACACAC" height="254" style="border-collapse: collapse">
<tr>
<td colspan="2" width="392" height="16" bgcolor="#BCBCBC">
<p align="center"><font color="#FFFFFF">用户资料修改</f

<!--#include file="conn.asp"-->
<%
edit=trim(request("edit"))
if edit="save" then
response.write "<script language=javascript></script>"
set rs = server.CreateObject("adodb.recordset")
sql="Update MB_Member Set M_Email ='"& trim(request("email")) &"' where M_Name='" & session("name") & "'"
rs.open Sql,my_conn,1,3
else
set rs = server.CreateObject("adodb.recordset")
sql = "Select * from MB_Member where M_Name='" & session("name") & "'"
rs.open Sql,my_conn,1,1
end if
%>
<form action=reg_edit.asp method=post name=reg>
<div align="center">
<center>
<table border="1" cellpadding="3" cellspacing="0" width="400" bordercolo