|
|
Postada em 07/04/2006 13:41 hs
Olá Roberto!!! Po cara eu não to entendendo, coninua dando erro!!! Eu já fiz esse tipo de rotina várias vezes e funcionou, mas agora não vai nem por reza. Se ainda puder me ajudar!!! Fico no aguardo!!!
Abraços!!! 
by
Gustavo Bittencourt Costa
|
|
|
|
|
|
|
|
Postada em 07/04/2006 16:07 hs
Mais alguém pode me ajudar??? Ps.: no post anterior onde se lê coninua leia-se continua.
Abraços!!!
by
Gustavo Bittencourt Costa
|
|
|
|
|
|
Postada em 07/04/2006 16:36 hs
vc. esta mandando exibir a mensagem, msgbox...comentei a linha dele, tente como esta abaixo: On Error GoTo TrataErro
Dir1.Path = Drive1.Drive
Exit Sub
TrataErro:
If Err.Number <> 0 Then
'MsgBox "Erro Nº.: " & Err.Number & vbCrLf & vbCrLf & Err.Description, vbCritical, TituloSistema
End If
|
|
|
|
|
|
Postada em 07/04/2006 16:44 hs
Ainda continua com erro!!! Pode??? Somebody help me!!!
Abraços!!!
by
Gustavo Bittencourt Costa
|
|
|
|
|
|
Postada em 07/04/2006 16:52 hs
Vc. tirou a linha do msgbox do 'TrataErro', o erro acontecerá de todo jeito, mas se vc. tirar a linha msgbox do 'TrataErro' ele nao exibe..., fiz aqui e deu certo. |
|
|
|
|
|
Postada em 07/04/2006 16:55 hs
Estranho...quer passar o seu projeto pra eu dar uma olhada... se é q as dicas anteriores deviam dar certo... t+ |
|
|
|
