Vbscript e campi text

Una pillola a mo’ di segnalibro. Purtroppo vbscript nativamente non è compatibile con i campi di SQL Server di tipo text / ntext. O meglio non viene prodotto un errore particolare, ma il valore di output è sempre vuoto.

Per risolvere il problema bisogna settare la proprità CursorLocation della connessione ADO DB, in modo che venga utilizzato un cursore client-side.

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("northwind.mdb"))
set rs=Server.CreateObject("ADODB.recordset")
sql="SELECT * FROM Customers"

rs.CursorLocation=adUseClient
rs.CursorType=adOpenStatic
rs.LockType=adLockBatchOptimistic

rs.Open sql,conn

rs.Close
conn.Close
%>

Esempio tratto da AdoDb di w3school. Al posto di adUseClient possiamo usare il valore 3.