URGENTE!! CONEXAO TABELAS RELACIONAS ADO
rssss
Vamos ver se consigo aqui agradeço novamente a todos, se eu consgeuir fazer o insert eu coloco aqui
Abraços
ate mais
Vamos ver se consigo aqui agradeço novamente a todos, se eu consgeuir fazer o insert eu coloco aqui
Abraços
ate mais
set rsAdicionar = new ADODB.Connection
rsAdicionar.Open " Insert into CadastroProclama ( ID, Chapa, Nome, DataDemissao, Departamento ,DataExecucao, Proclama, Solicitacao )" & _
" Values ( " & _
"'" & txtID.Text & "'," & _
"'" & txtChapa.Text & "'," & _
"'" & txtNome.Text & "'," & _
"#" & txtDemissao.Text & "#," & _
"'" & txtDepartamento.Text & "'," & _
"#" & DTExecucao.Value & "#," & _
"'" & txtProclama.Text & "'," & _
"'" & txtSolicitacao.Text & "')", conn2
Set rsSistema = New ADODB.Recordset
rsSistema.Open " Insert into Sistema ( Chapa, Sistema1, Sistema2 )" & _
" Values ( " & _
"'" & txtChapa.Text & "'," & _
"'" & txtSis1.Text & "'," & _
"'" & txtSis2.Text & "')", conn2
galera ta ai o insert, facil só falto eu usar a cabeça kkkkkkkkkk
mais ta ai o select ai nao fiz
Abrços
rsAdicionar.Open " Insert into CadastroProclama ( ID, Chapa, Nome, DataDemissao, Departamento ,DataExecucao, Proclama, Solicitacao )" & _
" Values ( " & _
"'" & txtID.Text & "'," & _
"'" & txtChapa.Text & "'," & _
"'" & txtNome.Text & "'," & _
"#" & txtDemissao.Text & "#," & _
"'" & txtDepartamento.Text & "'," & _
"#" & DTExecucao.Value & "#," & _
"'" & txtProclama.Text & "'," & _
"'" & txtSolicitacao.Text & "')", conn2
Set rsSistema = New ADODB.Recordset
rsSistema.Open " Insert into Sistema ( Chapa, Sistema1, Sistema2 )" & _
" Values ( " & _
"'" & txtChapa.Text & "'," & _
"'" & txtSis1.Text & "'," & _
"'" & txtSis2.Text & "')", conn2
galera ta ai o insert, facil só falto eu usar a cabeça kkkkkkkkkk
mais ta ai o select ai nao fiz
Abrços
Ae LOCO...dominou o negócio..agora engrena..
té mais e n eskeça de encerra o tópico.
abraços
Vaalew sink
Fiz um flexgrid pra pesquisa usei o select la fico perfect
valew mesmo ajudo muito abraçosss
Onde coloco pra encerrar essa pinoia nao acho isso kkkkkkkkkkkk
Fiz um flexgrid pra pesquisa usei o select la fico perfect
valew mesmo ajudo muito abraçosss
Onde coloco pra encerrar essa pinoia nao acho isso kkkkkkkkkkkk
La na parte superior da sua tela...vai aparecer um comboBox...com a opção encerrar tópico..
e do lado um botão executar
clicando nesse botão aparecerá uma lista de pessoas q deram respostas, daàvc escolha a pessoa q melhor te ajudo, clica nela e clica no botão abaixo..
ta encerrado e pontuado.
té mais
Tópico encerrado , respostas não são mais permitidas