Hjälp! ADODB.Command fel!

Nu har man kört fast ordentligt här, håller på för över data mellan två olika SQL databaser, använder därför två ADODB.Connection objekt.

Lite kod...

	Set objConn = Server.CreateObject("ADODB.Connection")
	objConn.ConnectionString = "Provider=SQLOLEDB; Data Source=10.10.10.13; Initial Catalog=Database; User ID=userid; Password=password"
	objConn.Open
	
	strSQL = "SELECT bla bla bla..."
	Set objRS = objConn.Execute(strSQL)
	Set blablabla = objRS(1)
	osv...
	
	Set Conn = Server.CreateObject("ADODB.Connection")
	Conn.ConnectionString = "Provider=SQLOLEDB; Data Source=10.10.10.13; Initial Catalog=database2; User ID=userid2; Password=password2"
	Conn.Open
	
	Set cmd = Server.CreateObject("ADODB.Command")
	cmd.CommandText = "sp_insert_mail"
	cmd.ActiveConnection = Conn
	cmd.CommandType = adCmdStoredProc

	Do Until objRS.Eof
		cmd grejer
		cmd.Execute
		objRS.Movenext
	Loop

Felet som uppstår är:

ADODB.Command (0x800A0BB9)
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/exportmail.asp, line 32

line 32 är:
cmd.CommandType = adCmdStoredProc

Står stilla i skallen.

------------------
/JE