codice:
<%@ Language=VBScript %> 
<% Response.Buffer = True %> 
<html> 
<head> 
<title>Elabora</title> 
</head> 
<body> 
<% 
Dim objConn 
' Creo l'oggetto connection 
StrConnect = "driver={SQL Server};server=(local);uid=sa;pwd=;datab
ase=Northwind" 

set objConn= Server.CreateObject("ADODB.Connection") 
objConn.Open StrConnect 


' Recupererai i valori dei vari campi del form 
strLista = Request.Form("chk") 
 
strSQL = "SELECT * FROM Employees WHERE EmployeeID IN(" & strLista & ");" 
set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open strSQL,objConn
'e il ciclo per visualizzare qualcosa... 
' Chiudo e libero gli oggetti 
SET objRS = Nothing 
objConn.Close() 
SET objConn = Nothing 


%> 
</body> 
</html>