六狼论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

新浪微博账号登陆

只需一步,快速开始

搜索
查看: 22|回复: 0

asp下链接数据库的各种语句

[复制链接]

升级  1%

57

主题

57

主题

57

主题

举人

Rank: 3Rank: 3

积分
203
 楼主| 发表于 2013-1-26 13:38:19 | 显示全部楼层 |阅读模式
<% Response.Write "test" Dim db                                      Set db=Server.CreateObject("ADODB.Connection") 'db.Open "Dbq=C:\Inetpub\wwwroot\wwwlink.mdb; Driver={Microsoft Access Driver (*.mdb)}"'db.Open "Dbq=C:\Inetpub\db\wwwlink.mdb; Driver={Microsoft Access Driver (*.mdb)}"'db.Open "Dbq=C:\db\wwwlink.mdb; Driver={Microsoft Access Driver (*.mdb)}"'db.Open "Dbq=" & Server.Mappath("wwwlink.mdb") & ";Driver={Microsoft Access Driver (*.mdb)}" Dim conStrconStr="Driver={SQL Server}; Server=(local);UID=admin;PWD=000000;DATABASE=web;"db.open conStr Dim sqlStr,rssqlStr="select * from webInfo"set rs = db.Execute(sqlStr)%><table border="1px"><%Do While Not rs.Eof%><tr><td><a href="sqlDelete.asp?id=<%=rs("link_id")%>">删除</a></td><td><a href="sqlEdit.asp?id=<%=rs("link_id")%>">编辑</a></td><td> <%=rs("name")%></td><td> <%=rs("url")%></td><td> <%=rs("intro")%></td></tr><%rs.MoveNextLoop%></table> 防止遗忘,特写博客
您需要登录后才可以回帖 登录 | 立即注册 新浪微博账号登陆

本版积分规则

快速回复 返回顶部 返回列表