|
Postada em 28/06/2009 23:14 hs
estou fazendo um projeto para add varios CheckBox .Parameters.Append .CreateParameter("Ck1", adVarChar, adParamInput, 1) .Parameters("Ck1") = Ck1.Value ' nao esta gravando Grato
|
|
|
|
Treze
|
SÃO VICENTE SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 29/06/2009 09:09 hs
Vamos Lá Nilton, tente ser mais claro. Primeiro você deseja adicionar varios CheckBox em tempo de execussão é isto?
|
|
|
Nilton Vianna
não registrado
|
|
ENUNCIADA !
|
|
|
Postada em 29/06/2009 12:29 hs
opa, é seguinte os comando que estou usando para Salvar os demais text.box e esse abaixo .ParamInput, ).Parameters.Append .CreateParameter("Cep", adVarChar, adParamInput, 10) .ParamInput, ).Parameters.Append .CreateParameter("Nome", adVarChar, adParamInput, 50) .Parameters("Nome") = txt.Nome.Text .Parameters("Cep") = txt.Cep.Text no caso do check1.box nao aceita. Check1.value Valeu Treze Grato
|
|
|
|
Postada em 29/06/2009 15:42 hs
Boa tarde.
Tente o seguinte:
.Parameters.Append .CreateParameter("Ck1", adVarChar, adParamInput, 1) .Parameters("Ck1") = CStr(Ck1.Value)
Observe que você está declarando o parâmentro com o tipo CHAR e Ck1.Value é do tipo Integer.
Até mais.
|
TÓPICO EDITADO
|
|
|
|
|
Postada em 30/06/2009 00:22 hs
ok, DeFreitas deu certo esta gravando normal no caso da leitura a hora que eu abro meu Form estou usando assim; Ex: (CK1 = CheckBox) SQL = "SELECT Nome, Marca, CK1 From CadVeiculo Where VeiculoID=" & VeiculoID txtNome = rsPaciente(0) txtMarca = rsPaciente(1) CK1.Value = rsPaciente(2) So que o CK1 nao aparece marcado. ! vc tem algum Ex: Grato Valeu mesmo t+
|
|
|
|
Postada em 01/07/2009 09:19 hs
Beleza, rapaz?
Tente o seguinte:
CK1.Value = CInt(rsPaciente(2)) 'A propriedade Value é do tipo Integer
Até mais.
|
|
|