例6－12.asp

来自「web课件并附有习题练习还有实例详细的讲解了WEB的各种开发过程是学习 的好资料」· ASP 代码 · 共 10 行

<!-- #INCLUDE file="ADOVBS.inc"-->
<%
Set Conn=Server.CreateObject("ADODB.Connection") 
Conn.Open "MyData" 
'执行一个有结果返回的SQL命令
Set RS=Conn.Execute("SELECT * FROM sales", RecCount , AdCMDText) 
RS.Close
Conn.Close
%>