|
|
Postada em 12/09/2007 13:22 hs
Boa Tarde, Pessoal, está me aparcendo o erro: " Too many line continuation " quando tento inserir mais uma linha no código abaixo: Trim(txtnumeromatricula.Text) & "','" & _
Trim(txtdataadmissao.Text) & "','" & _
Trim(txtnomefuncionario.Text) & "','" & _
Trim(txtcpf.Text) & "','" & _
Trim(txtnomepai.Text) & "','" & _
Trim(txtnomemae.Text) & "','" & _
Trim(txtnumerocarteiraprof.Text) & "','" & _
Trim(txtnumeroseriecarteira.Text) & "','" & _
Trim(txtnumeroreservista.Text) & "','" & _
Trim(txtnumeroestrangeiro.Text) & "','" & _
Trim(txtoutras.Text) & "','" & _
Trim(txtsindicato.Text) & "','" & _
Trim(txtmatriculasindicato.Text) & "','" & _
Trim(txthablitacaoprof.Text) & "','" & _
Trim(txtinstrucao.Text) & "','" & _
Trim(txtestadocivil.Text) & "','" & _
Trim(txtnomeconjugue.Text) & "','" & _
Trim(txtdatanascimento.Text) & "','" & _
Trim(txtnacionalidade.Text) & "','" & _
Trim(txtsalario.Text) & "','" & _
Trim(txtendereco.Text) & "','" & _
Trim(txtnumeroend.Text) & "','" & _
Trim(txtcomplementoend.Text) & "','" & _
Trim(txtcargo.Text) & "')" & O que pode ser ? Grato |
|
|
|
|
|
Roßerto
|
SAO PAULO
SP - BRASIL
|
|
ENUNCIADA !
|
|
|
Postada em 12/09/2007 13:51 hs
Tente fazer assim Dim sSQL as String sSQL = Trim(txtnumeromatricula.Text) & "','" sSQL = sSQL & Trim(txtdataadmissao.Text) & "','" sSQL = sSQL & Trim(txtnomefuncionario.Text) & "','"
e assim sucessivamente Roberto |
|
|
|
|
|
Postada em 12/09/2007 15:03 hs
Ok, Porém o meu código está setando os campos no bd para que eu possa fazer a inclusão, segue exemplo abaixo: sql = insert into tbl_funcionarios (nome, cpf, telefone ) values ( '" & _ Trim(txtnome.text) & "','" & _ Trim(txtcpf.text) & "','" & _ Trim(txttelefone.text) & "')" ---------------------------------------------------------------------- No seu conselho ficaria assim ? Dim sSQL as String sql = " insert into tbl_funcionarios (nome, cpf, telefone ) values ( '" & _ sSQL = Trim(txtnome.text) & "','" sSQL = Trim(txtcpf.text) & "','" sSQL = Trim(txttelefone.text) & "')" Correto ? |
|
|
|
Roßerto
|
SAO PAULO
SP - BRASIL
|
|
|
ENUNCIADA !
|
|
|
Postada em 12/09/2007 15:25 hs
sql = "insert into tbl_funcionarios (nome, cpf, telefone ) values ( '"
sql = sql & Trim(txtnome.Text) & "','"
sql = sql & (txtcpf.Text) & "','"
sql = sql & Trim(txttelefone.Text) & "')"
Michel, em vez de vc de concatenar varias ao mesmo tempo, faça uma por uma. linha inicial sql = "insert into tbl_funcionarios (nome, cpf, telefone ) values ( '"
proxima linha sql = sql & Trim(txtnome.Text) & "','" adiciono mais uma linha a variavel SQL, mantendo os dados já adicionados. entendeu ? Roberto
|
|
|
|
Michel Morgado
não registrado
|
|
|
ENUNCIADA !
|
|
|
Postada em 12/09/2007 15:32 hs
Entendi ... Vou testar . Valeuu |
|
|
|
|
|
Postada em 12/09/2007 20:05 hs
Roberto, Ok, deu certo. Valeuuu |
|
|
|
|
