jooey

ok, vw pelo toq... falou...

Essa mesmo que estava setada.. então se for no access eu tenho que usar a 2.0 e no sql a 2.8?

Isso que é engraçado.. na do access ele não apresena o erro sem a referencia.. e no access sim... mas já funcionou depois que eu adicionei a referencia... era só uma duvida que eu qria tirar mesmo... falou...

aqui vai... Private Sub Imprime() With mdiMARKET.crwRelat 'com o crontrole do crystal On Error GoTo ErroCrystal 'prepara para pegar erro .Destination = crptToWindow 'ou CrptToPrinter .DataFiles = vgDirDb$(vgDbAtual) & vgNomeDb$(vgDbAtual) .ReportFileName = vgDirEXE$ & "Retique.RPT" 'e o nome do relatório a ser impresso .WindowTitle = "Lista de Clientes" 'título da janela If Not Vazio(Wfilial) Then If Not Vazio(Watividade) Then .SelectionFormula = "{Clientes.Filial}= '" & Wfilial & "'" & _ "and" & "{Clientes.Atividade}= '" & Watividade & "'" Else .SelectionFormula = "{Clientes.Filial}= '" & Wfilial & "'" End If Else If Not Vazio(Watividade) Then .SelectionFormula = "{Clientes.Atividade}= '" & Watividade & "'" Else .SelectionFormula = "" End If End If .Action = 1 End With Exit Sub [/quote] o erro da no action... vlw..

então.. é o erro que eu te passei acima.. mas a questão é que na vê~rsão sql ele não pede esta referencia.

Ola pessoal;;; eu tenho sistema com bd em sql e os relatorios em crystal... porem, os relatorios não conseguem acessar o banco de dados... Estou utilizando o psdodbc.dll(ODBC) Se eu fizer direto do crystal ele funciona, porem dentro do programa não... o erro que ocorre é: Erroe detected by DLL 20534 Crystal report Alguém poderia me ajudar? vlw...ateh+

então... eu tenho duas versões do meu programa .. uma com bd em access outra em sql.. quando eu compilo na versão em sql..ele não apresenta o erro e no access aparece.. você sabe m dizer porque? vlw...teh+

boa tarde William.. você poderia me passar um exeplo desse comando, por favor....? vlw...teh+

ok, funcionou vlw...

Boa tarde pessoal Estou tentando importar uma planilha de excel para dentr do meu banco em access... Dim oConn As ADODB.Connection Dim oCmd As ADODB.Command Dim oRS As ADODB.Recordset Dim Wnum As Integer, Wcodigo As String ' abre uma conexao com a planilha excel Set oConn = New ADODB.Connection oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=" & App.Path & "\pecas.xls;" & _ "Extended Properties=""Excel 8.0;HDR=Yes;"";" ' cria o objecto command e define a conexao ativa Set oCmd = New ADODB.Command oCmd.ActiveConnection = oConn ' abre a planilha oCmd.CommandText = "Select * from [Plan1$]" o erro ocorre na linha Dim oConn As ADODB.Connection erro: user-defined type not defined Vocês poderiam me ajduar a encontrar o erro? vlw desde já

ok, funcionou x] vlw kuroi pela força muito bom esse forum... vo começar a frequentar mais falou...abraço

ok,essa rotina funcionou, vlw mas eu continuo com um problema =/ em alguns cadastros tem essa divisão.. em otros não.. existe algum if que eu possa por pra fazer a rotina só quando tiver a barra? vlw desde já boa tarde

Boa tarde... Sou iniciante no VB, na minha empresa estou fazendo uma rotina de migração de um banco de dados em access para o da minha empresa que é tambem em access No cadastro dos produtos do banco do cliente, a descrição do produto e o codigo estão no mesmo campo da tabela , separados por "/", preciso separar os dados para a descrição e o codigo do produto. vlw desde agora Boa tarde