仓酷云 发表于 2015-1-16 23:13:16

ASP网站制作之Asp与Sql构建网站体系中对数据库的各类...

使用filesystemobject,可以对服务器上的文件进行操作,浏览、复制、移动、删除等。有ado的支持,asp对数据库的操作非常得心应手。你甚至可以像使用本地数据库那样,管理远程主机上的数据库,对表格、记录进行各种操作。数据|数据库<%

//查询办法
//----------------------------(1)-------------------------------
SetRsWorkUserInfo=Server.CreateObject("ADODB.RecordSet")

StrSql="SelectUsersId,LoginName,UserName,Password"
StrSql=StrSql&"FromUsers"
StrSql=StrSql&"WhereUsersId="&SqlStr(tUserID)

IfRsWorkUserInfo.State=1Then
RsWorkUserInfo.Close
EndIf
RsWorkUserInfo.OpenStrSql,Conn,1,1

IfNotRsWorkUserInfo.EofThen
LoginName=RsWorkUserInfo("LoginName")
UserName=RsWorkUserInfo("UserName")
Password=RsWorkUserInfo("Password")
Endif

RsWorkUserInfo.Close
SetRsWorkUserInfo=Nothing

//----------------------------(2)-------------------------------
StrSql="SelectUsersId,LoginName,UserName,Password"
StrSql=StrSql&"FromUsers"
StrSql=StrSql&"WhereUsersId="&SqlStr(tUserID)
SetRsFind=Conn.Execute(StrSql)

IfNotRsFind.EofThen
LoginName=RsFind("LoginName")
UserName=RsFind("UserName")
Password=RsFind("Password")
Endif

RsFind.Close
SetRsFind=Nothing

//修正办法
//----------------------------(1)-------------------------------
SetRsWorkUserInfo=Server.CreateObject("ADODB.RecordSet")

StrSql="SelectUsersId,LoginName,UserName,Password"
StrSql=StrSql&"FromUsers"
StrSql=StrSql&"WhereUsersId="&SqlStr(tUserID)

IfRsWorkUserInfo.State=1Then
RsWorkUserInfo.Close
EndIf
RsWorkUserInfo.OpenStrSql,Conn,1,3

IFNotRsWorkUserInfo.EofThen
RsWorkUserInfo("LoginName")=LoginName
RsWorkUserInfo("UserName")=UserName
RsWorkUserInfo("Password")=Md5(Password)
RsWorkUserInfo.Update
Update=True
Else
Update=False
Endif

RsWorkUserInfo.Close
SetRsWorkUserInfo=Nothing

//----------------------------(2)-------------------------------
StrSql="UpdateUsers"
StrSql=StrSql&"SetLoginName="&SqlStr(LoginName)&",UserName="&SqlStr(UserName)&",Password="&SqlStr(Password)
StrSql=StrSql&"WhereUsersId="&SqlStr(tUserID)
Conn.Execute(StrSql)



//增加办法
//----------------------------(1)-------------------------------
SetRsWorkUserInfo=Server.CreateObject("ADODB.RecordSet")

StrSql="SelectUsersId,LoginName,UserName,Password"
StrSql=StrSql&"FromUsers"
StrSql=StrSql&"WhereUsersId="&SqlStr(tUserID)

IfRsWorkUserInfo.State=1Then
RsWorkUserInfo.Close
EndIf
RsWorkUserInfo.OpenStrSql,Conn,1,3

IfRsWorkUserInfo.EofThen
RsWorkUserInfo.AddNew
RsWorkUserInfo("UsersID")=tUserId
RsWorkUserInfo("LoginName")=LoginName
RsWorkUserInfo("UserName")=UserName
RsWorkUserInfo("Password")=Md5(Password)
RsWorkUserInfo.Update
NewRecord=True
Else
NewRecord=False
Endif

RsWorkUserInfo.Close
SetRsWorkUserInfo=Nothing

//----------------------------(2)-------------------------------
StrSql="InsertIntoUsers(UsersId,LoginName,UserName,Password)"
StrSql=StrSql&"Values("&SqlStr(tUserID)&","&SqlStr(LoginName)&","&SqlStr(UserName)&","&SqlStr(Password)&")"
Conn.Execute(StrSql)


//删除办法
//----------------------------(1)-------------------------------
SetRsWorkUserInfo=Server.CreateObject("ADODB.RecordSet")

StrSq</p>减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。

简单生活 发表于 2015-1-19 19:32:40

Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件

金色的骷髅 发表于 2015-1-24 15:40:12

弱类型造成潜在的出错可能:尽管弱数据类型的编程语言使用起来回方便一些,但相对于它所造成的出错几率是远远得不偿失的。

蒙在股里 发表于 2015-1-31 08:05:01

Request:从字面上讲就是“请求”,因此这个是处理客户端提交的东东的,例如Resuest.Form,Request.QueryString,或者干脆Request("变量名")

只想知道 发表于 2015-2-2 22:23:44

封装性使得代码逻辑清晰,易于管理,并且应用到ASP.Net上就可以使业务逻辑和Html页面分离,这样无论页面原型如何改变,业务逻辑代码都不必做任何改动;继承性和多态性使得代码的可重用性大大提高。

再现理想 发表于 2015-2-8 14:23:07

ASP也是这几种脚本语言中最简单易学的开发语言。但ASP也是这几种语言中唯一的一个不能很好支持跨平台的语言。  因为ASP脚本语言非常简单,因此其代码也简单易懂,结合HTML代码,可快速地完成网站的应用程序。

变相怪杰 发表于 2015-2-25 17:34:21

运用ASP可将VBscript、javascript等脚本语言嵌入到HTML中,便可快速完成网站的应用程序,无需编译,可在服务器端直接执行。容易编写,使用普通的文本编辑器编写,如记事本就可以完成。由脚本在服务器上而不是客户端运行,ASP所使用的脚本语言都在服务端上运行。

admin 发表于 2015-3-8 00:21:49

不能只是将它停留在纸上谈兵的程度上。

若天明 发表于 2015-3-15 17:45:30

Server:这个表示的服务器,操作服务器的一些东西使用这个,如Server.Mappath转换服务器路径,Server.CreateObject实例化一个组件

分手快乐 发表于 2015-3-22 02:11:29

ASP.Net和ASP的最大区别在于编程思维的转换,而不仅仅在于功能的增强。ASP使用VBS/JS这样的脚本语言混合html来编程,而那些脚本语言属于弱类型、面向结构的编程语言,而非面向对象,这就明显产生以下几个问题:
页: [1]
查看完整版本: ASP网站制作之Asp与Sql构建网站体系中对数据库的各类...