LOG
qual é a código fonte para salvar alterações, inclusões etc em um arquivo .log
Existe "N" maneiras para fazer isso. O que você pretende?
Você quer gravar as alterações/inclusões no banco de dados?
Dê uma olhada em exemplos de manipulação de arquivos. Depois você monta um da maneira que te atender melhor...
http://www.vbmania.com.br/vbmdetail.php?varID=2504
Você quer gravar as alterações/inclusões no banco de dados?
Dê uma olhada em exemplos de manipulação de arquivos. Depois você monta um da maneira que te atender melhor...
http://www.vbmania.com.br/vbmdetail.php?varID=2504
Eu fiz essa aqui...
Coloque num módulo....
AÃ vc chama ela de qq parte do programa assim:
Append2Log ("Erro de conexão com o banco de dados. " & Err.Number & " - " & Err.Description)
Ou com a msg que você quiser......
* Faça referência à  "Microsoft Scripting Runtime" em Project -> References!!!
Public Function Append2Log(Content As String)
Dim Log As TextStream
Dim TrataError As Label
On Error GoTo TrataError
Set Log = FSO.OpenTextFile(App.path & "\Log.log", ForAppending, True)
Log.Write "[" & Format(Date, "dd/mm/yyyy") & "] "
Log.Write "[" & Format(Time, "hh:nn:ss") & "] "
Log.Write Content
Log.Write vbCrLf
Log.Close
TrataError:
Select Case Err.Number
Case 70
Err.Clear
Exit Function
End Select
End FunctionColoque num módulo....
AÃ vc chama ela de qq parte do programa assim:
Append2Log ("Erro de conexão com o banco de dados. " & Err.Number & " - " & Err.Description)
Ou com a msg que você quiser......
* Faça referência à  "Microsoft Scripting Runtime" em Project -> References!!!
Tópico encerrado , respostas não são mais permitidas