<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% call iderror If request.Form("submit") = "修改资料" Then Set rs = server.CreateObject("adodb.recordset") sql = "select * from mj_admin where id="&request.QueryString("ID")&"" rs.Open sql, conn, 1, 3 rs("mj_admin_true_name") = request.Form("mj_admin_true_name") rs("mj_admin_photo") = request.Form("mj_admin_photo") rs("mj_admin_photo_width") = request.Form("mj_admin_photo_width") rs("mj_admin_photo_height") = request.Form("mj_admin_photo_height") rs("mj_admin_smallphoto") = request.Form("mj_admin_smallphoto") rs("mj_admin_signature") = request.Form("mj_admin_signature") rs("mj_admin_smallphotowz") = request.Form("mj_admin_smallphotowz") rs("mj_admin_signaturewz") = request.Form("mj_admin_signaturewz") rs.update Call close_rs Call close_conn Call infohref("修改成功！", "mj_admin.asp") End If %>
资料修改
 
 
当前位置：资料修改
在这里，您可以根据您的姓名、密码、照片、签名等信息!
 
    系统参数设置
<% Set rs = server.CreateObject("adodb.recordset") sql = "select * from mj_admin where ID = "&request.QueryString("ID")&"" rs.Open sql, conn, 1, 1 %>
帐号： <%=rs("mj_admin_name")%>
姓名： " />
照片： " /> 请输入照片图片地址，或直接上传。
照片大小： 宽： " /> px 高： " /> px
小照片： " /> 请输入照片图片地址，或直接上传。
文章页照片： " /> 请输入照片图片地址，或直接上传。
签名：
文章页签名：