|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
在实现ERP等高端的ASP应用时,用户需要提供核心的经营资料,需要ASP商有很高的信用度。楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。程序|程序员数据库毗连:
<%
setconn=server.createobject("adodb.connection")
conn.open"driver={microsoftaccessdriver(*.mdb)};dbq="&server.mappath("数据库名")
%>
翻开数据库:
exec="select*from数据库表"
setrs=server.createobject("adodb.recordset")
rs.openexec,conn,1,1
参数1,1为读取
读取内容格局:<%=rs("字段")%>
增加纪录处置程序:
<%
setconn=server.createobject("adodb.connection")
conn.open"driver={microsoftaccessdriver(*.mdb)};dbq="&server.mappath("数据库名")
name=request.form("字段")name,tel,message为提交表单所设置的字段值
tel=request.form("字段")
message=request.form("字段")
exec="insertinto表名(字段)values("+字段+")"多个用逗号离隔
conn.executeexec利用execute提交
conn.close
setconn=nothing
%>
搜刮处置程序:
<%
name=request.form("字段")name,tel为提交表单所设置的字段值
tel=request.form("字段")
setconn=server.createobject("adodb.connection")
conn.open"driver={microsoftaccessdriver(*.mdb)};dbq="&server.mappath("数据库名")
exec="select*from表wherename="+字段+"andtel="+字段
setrs=server.createobject("adodb.recordset")
rs.openexec,conn,1,1
%>
页面搜刮到的内容导出来
<%
dowhilenotrs.eof
%><tr>
<td><%=rs("name")%></td>
<td><%=rs("tel")%></td>
<td><%=rs("time")%></td>
</tr>
<%
rs.movenext
loop
%>
删除纪录处置程序:
<%
setconn=server.createobject("adodb.connection")
conn.open"driver={microsoftaccessdriver(*.mdb)};dbq="&server.mappath("数据库名")
exec="delete*from表名where编号="&request.form("id")
conn.executeexec
%>
修正纪录处置程序:
<%
setconn=server.createobject("adodb.connection")
conn.open"driver={microsoftaccessdriver(*.mdb)};dbq="&server.mappath("数据库名")
exec="select*from表名where编号="&request.form("id")
setrs=server.createobject("adodb.recordset")
rs.openexec,conn,1,31,3为修正意义
rs("name")=request.form("字段")name,tel,message为提交表单所设置的字段值
rs("tel")=request.form("字段")
rs("message")=request.form("字段")
rs.update
rs.close
setrs=nothing
conn.close
setconn=nothing
%>
修正纪录实行程序:输出ID号页面>>>导出绝对应ID数据>>>>>>间接修正的处置程序
背景上岸处置程序例子:
<%
dimname,password
name=request.form("name")
password=request.form("password")
dimexec,conn,rs
exec="select*from表名where(name="&字段&"andpassword="&字段&")"
setconn=server.createobject("adodb.connection")
conn.open"driver={microsoftaccessdriver(*.mdb)};dbq="&server.mappath("数据库名")
setrs=server.createobject("adodb.recordset")
rs.openexec,conn
ifnotrs.eofthen
rs.Close
conn.Close
session("checked")="yes"
session("check")="right"
response.Redirect"index.asp"
else
session("checked")="no"
session("check")="wrong"
response.Redirect"login.asp"
endif
%>
每一个背景页面加上:
<%ifnotsession("checked")="yes"thensession内里界说一个checked字符串变量
response.Redirect"login.asp"
else
%></P>asp是基于web的一种编程技术,可以说是cgi的一种。它可以完成以往cgi程序的所有功能,如计数器、留言簿、公告板、聊天室等等。 |
|