欢迎来到天天文库
浏览记录
ID:40889582
大小:22.94 KB
页数:23页
时间:2019-08-10
《ASP代码集合资料》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库。
1、1、ASP开始结束符语法:<% %>文件后缀.asp2、判断语句:判断表单传来的用户名和密码是否正确,并提示If request("username")="admin"thenResponse.write"恭喜,你已经登录成功"ElseResponse.write"对不起,您输入的用户名错误,请返回重输入"EndifIfrequest("name")="admin"andrequest("pass")="admin"thenResponse.redirect"admin.asp"ElseResponse.redirect"login.
2、asp"Endif3、循环语句:循环显示6条数据库中的记录写法1:forn=1to6 response.write rs("title")&""ifnotrs.eofthen exitforelsers.movenextendifnext写法二:dowhilenotrs.eof response.write rs("title")&""rs.movenextloop4、常用变量转换函数:Now()函数返回系统时间Date()函数返回当前系统日期.CStr(int)函数转化一个表达式为字符串CInt(string)将一个表
3、达式转化为数字类型Trim(request("username"))函数去掉字符串左右的空格Left(rs("title"),10)函数返回字符串左边第length个字符以前的字符(含第length个字符),一般在限制新闻标题的显示长度的时候用Len(string)函数返回字符串的长度. 5、Access数据库连接代码方法一:db="mydata.mdb"‘如果放在目录中,就要写明"database/mydata.mdb"Setconn=Server.CreateObject("ADODB.Connection")connstr="Prov
4、ider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath(db)conn.Openconnstr方法二:'如果你的服务器采用较老版本Access驱动,请用下面连接方法db="mydata.mdb"‘如果放在目录中,就要写明"database/mydata.mdb"Setconn=Server.CreateObject("ADODB.Connection")connstr="driver={MicrosoftAccessDriver(*.mdb)};dbq="&Server.MapPat
5、h(db)conn.Openconnstr6、Recordset对象操作数据库语法(1)打开sql语句指定的表中的数据,把这批数据放入rs对象中取出news表中所有的数据放到rs中SetRs=Server.CreateObject("ADODB.RecordSet")SqlStr="select*fromnews"Rs.OpenSqlStr,conn,1,1取出news表中前6条数据放到rs中SetRs=Server.CreateObject("ADODB.RecordSet")SqlStr="selecttop6*fromnews"Rs.
6、OpenSqlStr,conn,1,1(2)循环显示6条rs对象中存在的数据,列表显示不带连接的写法forn=1to6 response.write rs("title")&"" ifnotrs.eofthen exitfor else rs.movenext endifnext带连接的写法forn=1to6 response.write""&left(rs("title"),20)&"" ifnotrs.eofthen
7、 exitfor else rs.movenext endifnext(3)向数据库添加一条数据代码SetRs=Server.CreateObject("ADODB.RecordSet")SqlStr="select*fromnews"Rs.OpenSqlStr,conn,1,3 ‘注意这里的1,3代表可以写入的打开数据表Rs.addnewRs("title")=trim(request("title"))Rs("neirong")=request("neirong")Rs("date")=now
8、() rs.update ‘真正写入数据库(4)修改一条记录的代码,通过(2)中的连接传递过来了id数值SetRs=Server.CreateObject("ADO
此文档下载收益归作者所有