create procedure si_authors
arroba au_id varchar(40),
arroba au_lname varchar(20),
arroba au_fname varchar(20),
arroba phone char(12),
arroba address varchar(40),
arroba city varchar(20),
arroba state char(2),
arroba zip char(5),
arroba contract bit
as
insert into authors
(au_id,au_lname,au_fname,phone,address,city,state, zip,contract)
values
(
'arroba au_id',
'arroba au_lname',
'arroba au_fname',
'arroba phone',
'arroba address',
'arroba city',
'arroba state',
'arroba zip',
'arroba contract'
)
Mi codigo para insertar es:
Código:
Dim objCmd As ADODB. Co mmand
Set objCmd = New ADODB. Co mmand
objCmd. Co m mandType = adCmdStoredProc
objCmd. Co m mandText = "si_authors"
Set objCmd.ActiveConnection = cn
objCmd.Parameters.Append objCmd.CreateParameter("arroba au_id", adVarChar, adParamInput, 11, txtCodigo)
objCmd.Parameters.Append objCmd.CreateParameter("arroba au_lname", adVarChar, adParamInput, 40, txtNombre)
objCmd.Parameters.Append objCmd.CreateParameter("arroba au_fname", adVarChar, adParamInput, 20, txtApellido)
objCmd.Parameters.Append objCmd.CreateParameter("arroba phone", adChar, adParamInput, 20, txtTelefono)
objCmd.Parameters.Append objCmd.CreateParameter("arroba address", adVarChar, adParamInput, 40, txtDireccion)
objCmd.Parameters.Append objCmd.CreateParameter("arroba city", adVarChar, adParamInput, 20, txtCiudad)
objCmd.Parameters.Append objCmd.CreateParameter("arroba state", adChar, adParamInput, 2, txtPais)
objCmd.Parameters.Append objCmd.CreateParameter("arroba zip", adChar, adParamInput, 5, txtZip)
' es aqui donde tengo el problema
objCmd.Parameters.Append objCmd.CreateParameter("arroba contract", adBoolean, adParamInput, 11, txtContract)
objCmd.Execute
No se que tipo de dato se usa en el vb 6.0 para los bit, creo que adboolean no es =S alguien sabe
NOTA: Esta tabla es de la BD pubs de SQL SERVER, juntar donde diga arroba cambiar por el simbolo "arroba" quitandole el espacio a la derecha. Gracias
SOLUCIONADO
El problema estaba en el STORE PROCEDURE, habia puesto ya dentro del insert '@au_id' pensando que el SQL tomaba los valores dentro de las comillas le quite las comillas y funciono a la perfeccion saludos
