RecorteX

descargar
 
ConnectionString = "DRIVER=SQL Server;SERVER=localhost;DATABASE=MasterDB;Address=127.0.0.1,1433;Trusted_Connection=Yes;"
 
set conn = Server.CreateObject("adodb.connection")
conn.open ct_ConnectionString
 
conn.execute "INSERT ..."
 
set rs = Server.CreateObject("adodb.recordset")
rs.Open "SELECT ...", conn
 
do until rs.eof
rs.MoveNext: loop
 
rs.Close
set rs = Nothing
 
conn.close
set conn = Nothing