Hosting & Domini

Esempio di connessione DSN-less

Per connettersi ad un database MS SQL Server 2000 o 2005 senza ODBC, quindi senza ricorrere ad un DSN (data source name) di sistema, potete creare una connessione DSN-less, come nell'esempio sottostante.

Connessione a DB SQL Server con SQL Server Driver (DSN less)

<%@LANGUAGE=VBSCRIPT%>
<%
Option Explicit
Dim strConnection, conn, rs, strSQL

strConnection = "Driver={SQL Server};Server=SQLServerName;" & _
"Database=DBaseName;Uid=sa;Pwd=password;"

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

Set rs = Server.CreateObject("ADODB.recordset")
strSQL = "SELECT * FROM myTable"
rs.open strSQL, conn, 3,3

rs.MoveFirst
WHILE NOT rs.EOF
Response.Write(rs("myField") & "<br/>")
rs.MoveNext
WEND

rs.Close
Set rs = Nothing

conn.Close
Set conn = Nothing
%>

Connessione Database Oracle con Microsoft ODBC per Oracle (DSN less)

<%@LANGUAGE=VBSCRIPT%>
<%
Option Explicit
Dim strConnection, conn, rs, strSQL

strConnection = "Driver={Microsoft ODBC for Oracle};" & _
"Server=OracleServerName;uid=username;pwd=password;"

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

Set rs = Server.CreateObject("ADODB.recordset")
strSQL = "SELECT * FROM myTable"
rs.open strSQL, conn, 3,3

rs.MoveFirst
WHILE NOT rs.EOF
Response.Write(rs("myField") & "<br/>")
rs.MoveNext
WEND

rs.Close
Set rs = Nothing

conn.Close
Set conn = Nothing
%>