《订单页面源代码》由会员分享,可在线阅读,更多相关《订单页面源代码(28页珍藏版)》请在金锄头文库上搜索。
1、 所有订单如下:%sql=selecttop8OrderComName,OrderClass,OrderIdFromOrderorderbyOrderiddescSetrs=Server.CreateObject(ADODB.Recordset)rs.opensql,conn,1,1ifrs.eofandrs.bofthenresponse.write对不起,没有找到任何订单elsedowhilenotrs.eof%ahref=Order.asp?OrderId=&Action=ShowOrder 用户注册用户名: 密 码:&nb
2、sp; 16orUserName=AdminorUserName=adminThenErrorMsg1=trueElseErrorMsg1=FalseEndIfIfPassword=OrLen(Password)=0orLen(Password)16thenErrorMsg2=trueElseErrorMsg2=FalseEndIfIfErrorMsg1=TrueorErrorMsg2=TruethenResponse.Write(用户名长度必须大于0,小于20)Response.Write(密码不能为空,长度必须大于6,小于16)Response.Write(【返回】)EndIfIf(ErrorMag1=falseandErrorMsg2=false)ThenSetRsReg=Server.CreateObject(Adodb.Recordset)SqlReg=Select*FromUserWhereUsername=&UserName&RsReg.OpensqlReg,Conn,1,3IfNot(RsReg.EoforRsReg.Bof)ThenResponse.Write(对不起,你的用户名已经被他人使用!)Response.Write(