USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  SALVAR CheckBox
Nilton Vianna
AMPARO
SP - BRASIL
ENUNCIADA !
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
Pontos: 2843 Pontos: 2843
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
 
   
DeFreitas
SÃO PAULO
SP - BRASIL
ENUNCIADA !
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
 
Nilton Vianna
AMPARO
SP - BRASIL
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+
 
     
DeFreitas
SÃO PAULO
SP - BRASIL
ENUNCIADA !
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.
   
Página(s): 1/2      PRÓXIMA »


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2024   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página