<%Response.Buffer=Truesession.timeout=20on error resume nextDB="database/data.mdb"set conn=server.createobject("adodb.Connection")connstr="provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DB)conn.Open connstr
Set rs=Server.CreateObject("ADODB.Recordset") sql="select * from MT_abc" rs.open sql,conn,1,3 rs("username")=trim("mintao")
rs.update rs.close conn.close set rs=nothing set conn=nothing
response.write "<script language='javascript'>" response.write "alert('操作成功:**基本信息设置完成!');" response.write "location.href='index.asp';" response.write "</script>" response.end%>
Copyright @ 2007-2012 敏韬网(敏而好学,文韬武略--MinTao.Net)(学习笔记) Inc All Rights Reserved. 闵涛 E_mail:admin@mintao.net(欢迎提供学习资源)
鄂公网安备 42011102001154号
站长:MinTao ICP备案号:鄂ICP备11006601号-18