useredit.asp

来自「一个用jsp 编写的个人主页网站哦。希望对大家有所帮助啊」· ASP 代码 · 共 34 行

<!--#include file = "public.asp"-->
<!--#include file = "md5.asp"-->
<%
password=Request.form("password")
Email=Request.Form("Email")
SiteName=Request.Form("SiteName")
URL=Request.Form("URL")
linktype=Request.Form("linktype")
Description=Request.Form("Description")
logo=request.Form("logo")

    Set rsc=Server.CreateObject("ADODB.RecordSet")
    if  session("admintype")="admin" or session("admintype")="common" then 
	rsc.open "Select * From friend where id="&session("id"),Conn,2,3
	rsc("siteclick")=request.Form("siteclick")
	rsc("MyDate")=request.Form("MyDate")
	else 
	rsc.open "Select * From friend where name='" & session("name")& "'",Conn,2,3
	if session("name")<>rsc("Name") then response.Redirect("index.asp")
	end if
	if rsc("password")<>password then rsc("password")=md5(password)
    rsc("email")=email
	rsc("SiteName")=SiteName
	rsc("url")=url
	rsc("Description")=Description
	rsc("linktype")=linktype
	rsc("sitelogo")=logo
    rsc.update
    rsc.close
	
conn.close
set conn=nothing
response.redirect "succeed.asp?mode=edit"
%>