objeto1_systems

Poderia me explicar como eu utilizo? eu estoyu iniciando agora no visual basic Obrigado Samira

Oi pessoal desculpa se não soube formular bem a pergunta mais a minha dúvida é o seguinte. Eu esotu usando no meu formulário microsoft flex grid e gostaria de esta pegando os dados de várias tabelas e exibindo lá como devo fazer?

Oi pessoal, Estou usando o visual data manager para criação de tabelas do access, como que faço para relacionar os dados das tabelas para exibir em uma única tabela?

O erro acontece na seguinte linha With Objword.Selection.Find A mensagem de erro é Run Timer Erro n° 424 Object not required Eu gostaria de saber se existe até mesmo uma maneira mais facil de arir um documento do word Agradeço quem puder me ajudar

Por favor me ajude a encontrar o erro O erro que esta dando número: 424 O código fonte: Private Sub cmdContrato_Click() Dim temp As String On Error GoTo trata_erro Set ObjWord = New Word.Application ' Desabilita o botao de comando cmdContrato.Enabled = False ' nome do relatorio pré montado ObjWord.Documents.Open ("c:\pituca\contrato.doc") ' chama rotina para substituicao 'Call Substitui_Var("@contratada", txtNome)' Call Substitui_Var("@rg", txt_rg) Call Substitui_Var("@cpf", txt_cpf) Call Substitui_Var("@endereco", txtEndereco) Call Substitui_Var("@cidade", txt_cidade) Call Substitui_Var("@estado", txt_estado) Call Substitui_Var("@tel", txt_tel) ' Salva o documento com um novo nome ObjWord.ActiveDocument.SaveAs (txtContrato) 'Encerra o word ObjWord.Quit ' informa ao usuario que o contrato foi gerado MsgBox "Contrato gerado com sucesso! em : " & txtContrato, vbInformation, " Contrato Gerado " ' libera memoria Set ObjWord = Nothing Exit Sub trata_erro: MsgBox "Ocorreu um erro durante o processamento " & " - Erro numero : " & Err.Number End Sub Muito obrigado, Samira Souza

Meu e-mail é sami_souza@terra.com.br

Estou fazendo um botão chamado incluir e quero adicionar dados no meu banco de dados Access. O código fonte esta assim: cmdIncluir.Enabled = True cmdAlterar.Enabled = True dadosCliente.Recordset.AddNew (isto é um data control) qual é o meu erro? Muito obrigado Samira