ASP编程：数据库毗连（无错）
无法实现跨操作系统的应用。当然这也是微软的理由之一，只有这样才能发挥ASP最佳的能力。可是我却认为正是Windows限制了ASP，ASP的概念本就是为一个能让系统运行于一个大的多样化环境而设计的；数据|数据库|数据库毗连|数据库毗连ASP毗连SQLServer2000数据库例程--------------------------------------------------------------------------------
<%
Dimmode
mode=request.form("text4")
ifmode=1then
name=request.form("text1")
age=request.form("text2")
addr=request.form("text3")
ifnotisnumeric(age)thenresponse.write"agemustbenumber!<ahref=javascript:history.go(-1)>tryagain</a>":response.end
age=clng(age)
endif
********************************************************************
与SQLServer2000有关的毗连
能够参照它创建您的数据库毗连
********************************************************************
敬请注重：
请依据情形设置StrServer,StrUid,StrSapwd,StrDbName四个参数
DimStrServer,StrUid,StrSaPwd,StrDbName
StrServer="(local)"数据库服务器名
StrUid="testuser"您的登录帐号
StrSaPwd="12345"您的登录暗码
StrDbName="db_test_com"您的数据库称号
DimConn数据库毗连
DimStrDSN数据库毗连字符串
DimRs命令字符串
StrDSN="driver={SQLserver};server="&StrServer&";uid="&StrUid&";pwd="&StrSaPwd&";database="&StrDbName
创建和数据库master的毗连
setConn=Server.CreateObject("ADODB.Connection")
setRs=Server.CreateObject("ADODB.RecordSet")
Conn.OpenStrDSN
********************************************************************
********************************************************************
Dimstrsql
********************************************************************
读数据库的相干操纵
subreaddb()
strsql="select*fromtest"
rs.openstrsql,conn,1,1
ifrs.EOFthenresponse.write"norecordatall":exitsub
response.write"<tableborder=1>"
response.write"<tr>"
fori=0tors.Fields.Count-1
response.write"<td><fontcolor=blue>"&rs.Fields(i).Name&"</font></td>"
next
response.write"</tr>"
whilenotrs.EOF
response.write"<tr>"
fori=0tors.Fields.Count-1
response.write"<td>"&rs.Fields(i).Value&"</td>"
next
response.write"</tr>"
rs.MoveNext
wend
response.write"</table>"
rs.Close
endsub
********************************************************************
********************************************************************
写数据库的相干操纵
subinsertdata()
strsql="INSERTINTOtest(name,age,addr)VALUES("&name&","&age&","&addr&")"
rs.Openstrsql,conn,1,3
endsub
********************************************************************
ifmode=1then
callinsertdata()
response.write"insertok!"
elseifmode=2then
callreaddb()
endif
开释数据库毗连工具
setrs=nothing
setconn=nothing
%>
<HTML>
<HEAD>
<TITLE></TITLE>
<scriptlanguage=javascript>
functionclickit(flag){
varform1=document.form2
form1.text4.value=flag;
if(flag==1){
if(form1.text1.value==""){
alert("namecantempty!");
returnfalse;
}
if(form1.text2.value==""){
alert("agecantempty!");
returnfalse;
}
if(form1.text3.value==""){
alert("addrcantempty!");
returnfalse;
}
}</p>下一页
ASP是依赖组件的，能访问数据库的组件好多就有好多种,再有就是你微软的工具可是什么都要收钱的啊！ 交流是必要的，不管是生活还是学习我们都要试着去交流，通过交流我们可以学到很多我们自己本身所没有的知识，可以分享别人的经验甚至经历。 用户端的浏览器不需要提供任何别的支持，这样大提高了用户与服务器之间的交互的速度。 下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。 最近在学asp，不要问我为什么不直接学.net，因为公司网站是asp做的所以有这个需要，卖了本书asp入门到精通，对里面的六大内置对象老是记不住，还有很多属性和方法看的头晕。 兴趣爱好，那么你无须学编程，申请一个域名和空间，在网上下载一些免费开源的CMS系统，你不用改代码，只须熟悉它们的后台操作，像office一样简单方便，很快就能建一个站点，很多站长都是这样做的 ASP.Net和ASP的最大区别在于编程思维的转换，而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程，而那些脚本语言属于弱类型、面向结构的编程语言，而非面向对象，这就明显产生以下几个问题： 接下来就不能纸上谈兵了，最好的方法其实是实践。实践，只能算是让你掌握语言特性用的。而提倡做实际的Project也不是太好，因为你还没有熟练的能力去综合各种技术，这样只能使你自己越来越迷糊。 下载一个源代码，然后再下载一个VBScript帮助，在源代码中遇到不认识的函数或是其他什么程序，都可以查帮助进行解决，这样学习效率很高。
页:
[1]