sql怎么连asp

```vbscript

<%@ Language=VBScript %>

<%

Set conn = Server.CreateObject("ADODB.Connection")

conn.Open "Provider=sqloledb;Data Source=YourServerName;Initial Catalog=YourDatabaseName;User ID=YourUsername;Password=YourPassword;"

Set rs = Server.CreateObject("ADODB.Recordset")

sql="SELECT * FROM YourTableName"

rs.Open sql,conn

Do While Not rs.EOF

Response.Write(rs() & "
")

rs.MoveNext

Loop

rs.Close

Set rs = Nothing

conn.Close

Set conn = Nothing

%>

```

在上述代码中，“YourServerName”，“YourDatabaseName”，“YourUsername”和“YourPassword”替换为实际的数据库信息。