Cuestión : Error 3709 en el uso del ASP

Estoy consiguiendo el error 3709: La conexión no se puede utilizar para realizar esta operación. Es cerrada o inválida en este contexto. No puedo encontrar dónde está sucediendo esto. He incluido el código abajo. Cualquier ayuda es socon de appreciated.

Dim como ADODB.Connection: Fijar el socon = el dbC
Dim sorec1 como ADODB.Recordset
Set sorec1 = nuevo cmd de ADODB.Recordset
Dim como ADODB.Command: Fijar el cmd = nuevo ADODB.Cmd
Dim socomm1 como ADODB. Connection

sorec1.Open socomm1, adCmdText

l_EventID =
Return_Value = 0
g_CreatorID = CLng (sesión (“UserID”))cmd
del

With determinado .ActiveConnection = socon
.CommandText = SP_CREATEFORM
.CommandType = adCmdStoredProc
.
de Parameters.Append .CreateParameter (“@Return_Value”, adInteger, adParamReturnValue, Return_Value).
de Parameters.Append .CreateParameter (“@EventID”, adInteger, adParamInput, l_EventID).
.Execute de Parameters.Append .CreateParameter (“@CreatorID”, adInteger, adParamInputOutPut, g_CreatorID), adExecuteNoRecords
End With

Set sorec1 = socon de Nothing
DropCn, cmd
class= del

Respuesta : Error 3709 en el uso del ASP

Pienso que la fuente del error es “sorec1.Open socomm1, adCmdText”
Usted apenas declara la conexión “socomm1” antes de usarla sin la abertura.