Fernandinha

Olá!!! Eu abro o outro formulário e depois de aberto que eu coloco o código para inserir as informações. Daí quando eu estou debugando o código, as informações aparecem certinho em cima da linha sabe, colocando o cursor do mouse, mas quando eu vou para o outro formulário, onde as informações deveriam ser inseridas, o mesmo fica vazio, não entendi porque acontece isso. =(

Olá!! Esse arquivo que você quer fazer a importação, os dados estão separados por espaço mesmo???

Olá! Então, eu não estou enviando os dados para o banco, isso ele faz depois com uma rotina pronta, eu só queria agora inserir os dados em um formulário acionando um botão que foi criado em outro formulário, mas as informações pré definidas na linha de código, não estão sendo inseridas no form que será alimentado.

Olá pessoal, td bem com vocês??? Estou com um probleminha aqui de inclusão automática de dados em um formulário do VB6. Os valores estão sendo guardados, porém não estão sendo inseridos. Alguém poderia me dar uma dica por favor. Segue abaixo código, o mesmo não apresenta erro algum na hora da execução. frmCorrecaoCaso.chkApagarLog.value = 1 frmCorrecaoCaso.txtSolicitante.text = re_acesso frmCorrecaoCaso.cboStatus.AddItem "CONCLUÍDO" frmCorrecaoCaso.cboStatus.text = "CONCLUÍDO" frmCorrecaoCaso.cboTipo.AddItem "PERFIL" frmCorrecaoCaso.cboTipo.text = "PERFIL" Desde já agradeço a ajuda. Fernanda

Muito obrigada, deu certo e agora eu aprendi =D

Olá pessoal, td bem??? Alguém poderia me dar um help em relação a update com vários inner joins???? Não estou conseguindo está dando erro. update FERRAMENTAS INNER JOIN (NW_CASO ON FERRAMENTAS.ID = NW_CASO.casFerId INNER JOIN NW_FILA ON NW_CASO.casId = NW_FILA.flaCasId INNER JOIN NW_CASO_TERMINAL ON NW_CASO.casId = NW_CASO_TERMINAL.catCasId INNER JOIN CAD_USUARIOS ON NW_FILA.flaAnalista = CAD_USUARIOS.RE INNER JOIN NW_TERMINAL ON NW_CASO_TERMINAL.catTerId = NW_TERMINAL.terId INNER JOIN NW_CLIENTE ON NW_TERMINAL.terCliId = NW_CLIENTE.cliId set NW_FILA.flaanalista = '1056123' where FERRAMENTAS.ferramenta = 'SP GERAL - A. TELECOM' and NW_CASO.casdtentrada >= '2008-10-01' Segue o erro: Msg 156, Level 15, State 1, Line 2 Incorrect syntax near the keyword 'INNER'. Muito obrigada, desde já. Fernanda

Muito obrigada, deu certo. =D Private Sub Command1_Click() Dim Path As String Dim Linha00, aux As String Dim i As Integer Path = "C:\teste.txt" Open Path For Output As #1 Linha00 = ("0000123456789teste") Print #1, Linha00 Close #1 End Sub

Boa noite pessoal, td bem?? Sou nova nessa área de programação e preciso desenvolver através do VB6 um arquivo .txt e incluir informações fixas mescladas com informações do banco de dados, porém fiz uma coisinha por enquanto apenas para inserir o conteúdo que é fixo e não está dando certo, vocês poderiam me dar uma forcinha, por favor??? Desde já agradeço. Segue código desenvolvido: Private Sub Command1_Click() Dim Path As String Dim Linha00, aux As String Path = "C:\teste.txt" Open Path For Output As #1 Linha = ("0000123456789teste") 'Quero inserir essa linha dentro do arquivo que foi criado. Line Input #1, aux Linha00 = Linha00 & aux Close #1 End Sub Segue erro de execução: Run-time error '54': Bad file mode Muito obrigada.