PESA MUITO
ola pessoal duvida boba tenho alguns forms e gostaria de saber se acontece muitos errros ou se pesa muito no progrma colocar dados de um form aparecendo em outros ? tipo receber dados de outros forms , pq fiz uma instrucao boba aki pra recer um nome de proprietario e ja deu erro no botao excluir
Se depois de RECEBER os dados (PARÓ¡METROS) você DESCARREGA o FORM da MEMÓ“RIA não tem PROBLEMA...
Se precisar usar estes PARÓ¡METROS durante a aplicação
Use variáveis GLOBAIS..
Num módulo declare
Assim você poderá armazenar e recuperar informações da variavel global de qualquer parte do projeto, de qualquer form...
Form1
text1.Text = vNome 'pega o nome armazenado na Variavel Global...
Form2
vNome = "José da Silva" 'Atribui um novo valor a variável Global...
...
AtééÂÂÂ'...
Se precisar usar estes PARÓ¡METROS durante a aplicação
Use variáveis GLOBAIS..
Num módulo declare
GLOBAL vNome as StringAssim você poderá armazenar e recuperar informações da variavel global de qualquer parte do projeto, de qualquer form...
Form1
text1.Text = vNome 'pega o nome armazenado na Variavel Global...
Form2
vNome = "José da Silva" 'Atribui um novo valor a variável Global...
...
AtééÂÂÂ'...
ok vou tentar
mas pq no global ja leva o nome do cara por exeplo e se cada registro tiver um nome diferente por pertencer a um proprietario difewrente tipo eu fiz assim
'rsApartamentos.Open "SELECT Tbl_Apartamentos.*, Tbl_Proprietarios.Nome FROM Tbl_Apartamentos Inner Join " & _
'"Tbl_Proprietarios On Tbl_Apartamentos.Codigo = Tbl_Proprietarios.Codigo " & _
'"order by Tbl_Apartamentos.Codigo, Tbl_Apartamentos.CodigoImo", cnBd, adOpenKeyset, adLockOptimistic
'rsApartamentos.Open "SELECT Tbl_Apartamentos.*, Tbl_Proprietarios.Nome FROM Tbl_Apartamentos Inner Join " & _
'"Tbl_Proprietarios On Tbl_Apartamentos.Codigo = Tbl_Proprietarios.Codigo " & _
'"order by Tbl_Apartamentos.Codigo, Tbl_Apartamentos.CodigoImo", cnBd, adOpenKeyset, adLockOptimistic
Guto... o exemplo acima foi só para MOSTRAR o que fazer, quando vc PRECISAR uma uma VARIÃ ÂVEL em todo o PROJETO.... Não disse que vc tem quer ARMAZENAR...o nome da pessoa...
Cada caso é um caso....
Cada caso é um caso....
agora pq o codigo acima naun dexa eu excluir registros , eiu ate sei q ta faltando alguam coisa .............. mas vei naun cosigo identificar
Vc um select oriundo de relacionamentos, isso não é possÃvel...
Tenta um
cnBd.Execute "DELETE FROM Tbl_Apartamentos WHERE bl_Apartamentos Inner Join " & _
'"Tbl_Proprietarios On Tbl_Apartamentos.Codigo = Tbl_Proprietarios.Codigo " & _
'"order by Tbl_Apartamentos.Codigo, Tbl_Apartamentos.CodigoImo"
Mais ou menos isso...
O Recordset do ADO está aberto corretamente!!!
Tenta um
cnBd.Execute "DELETE FROM Tbl_Apartamentos WHERE bl_Apartamentos Inner Join " & _
'"Tbl_Proprietarios On Tbl_Apartamentos.Codigo = Tbl_Proprietarios.Codigo " & _
'"order by Tbl_Apartamentos.Codigo, Tbl_Apartamentos.CodigoImo"
Mais ou menos isso...
O Recordset do ADO está aberto corretamente!!!
ae neo desse geito ai quando ei abri o programa naun apareceu nenhum registro no form
Tópico encerrado , respostas não são mais permitidas