站内搜索
分类列表
本类阅读排行
本类推荐文章
- ASP技巧:让Len,Left,Right函数识...
- 用ASP实现IE地址栏参数的判断
- 如何实现ASP.NET网站个性化
- 如何在Asp.net中使用HtmlArea编辑...
- 用ASP.Net实现在线压缩和解压缩
- ASP实现不存在的网页就自动发送邮...
- 用ASP取出HTML里面的图片地址的函...
- asp.net跳转页面的三种方法比较
- 一个Winsock组件
- 用WinSock设计Chat程序(转)
- 在MFC应用中深入定制WebBrowser控...
- 这几天有人问关于编应.dll的问题,...
- 在Visual J++中编写ASP COM组件(转...
- 一个显示Grid的VBScript对象
- 好东西,快来看呀:(转载自中华网...
广告
Asp+Sql 个人总结对数据库的各种操作
作者: 来源: 点击: 日期:2007-2-3 23:24:57
放松生活网(Relaxlife.net)Asp+Sql 个人总结对数据库的各种操作
/**********************************************************************
*
* 1,---------Asp+Sql 个人总结对数据库的各种操作
*
* 如果需要更多代码,请到:http://www.relaxlife.net 感觉好帮我顶!
*
*
*********************************************************************/
<%
’//查询方法
’//----------------------------(1)-------------------------------
Set RsWorkUserInfo = Server.CreateObject("ADODB.RecordSet")
StrSql = "Select UsersId, LoginName, UserName, Password"
StrSql = StrSql & " From Users"
StrSql = StrSql & " Where UsersId=" & SqlStr(tUserID)
If RsWorkUserInfo.State = 1 Then
RsWorkUserInfo.Close
End If
RsWorkUserInfo.Open StrSql,Conn,1,1
If Not RsWorkUserInfo.Eof Then
LoginName = RsWorkUserInfo("LoginName")
UserName = RsWorkUserInfo("UserName")
Password = RsWorkUserInfo("Password")
End if
RsWorkUserInfo.Close
Set RsWorkUserInfo = Nothing
/**********************************************************************
*
* 1,---------Asp+Sql 个人总结对数据库的各种操作
*
* 如果需要更多代码,请到:http://www.relaxlife.net 感觉好帮我顶!
*
*
*********************************************************************/
<%
’//查询方法
’//----------------------------(1)-------------------------------
Set RsWorkUserInfo = Server.CreateObject("ADODB.RecordSet")
StrSql = "Select UsersId, LoginName, UserName, Password"
StrSql = StrSql & " From Users"
StrSql = StrSql & " Where UsersId=" & SqlStr(tUserID)
If RsWorkUserInfo.State = 1 Then
RsWorkUserInfo.Close
End If
RsWorkUserInfo.Open StrSql,Conn,1,1
If Not RsWorkUserInfo.Eof Then
LoginName = RsWorkUserInfo("LoginName")
UserName = RsWorkUserInfo("UserName")
Password = RsWorkUserInfo("Password")
End if
RsWorkUserInfo.Close
Set RsWorkUserInfo = Nothing
Asp+Sql 个人总结对数据库的各种操作 评论
