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

最新推荐文章于 2024-06-09 00:08:29 发布

原创最新推荐文章于 2024-06-09 00:08:29 发布 · 131 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#ASP #Microsoft #SQL Server #Access #C

VS开发专栏收录该内容

6 篇文章

订阅专栏

本文展示了一个使用ASP访问后台数据库的具体实例，通过连接SQL Server数据库并读取webInfo表中的数据，展示了如何在网页上显示数据库中的记录。该示例包括了数据库连接字符串配置、SQL查询语句执行及结果集的遍历。

		<% 
			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 conStr
			conStr="Driver={SQL Server}; Server=(local);UID=admin;PWD=000000;DATABASE=web;"
			db.open conStr 
			Dim sqlStr,rs
			sqlStr="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.MoveNext
				Loop
			%>
		</table>

防止遗忘，特写博客