怎样用vb编写自动加入日志文件到数据库(可以的话,分全部给你!)

feng225 2002-05-11 09:41:55
各位大虾好!
有这么一个小问题,为了操作管理,我们一般在操作时记录操作者的操作日志,我想问,怎样用Vb编写一个自动添加日志文件到数据库中,日志文件中包括操作者的操作信息。望赐教!不胜感激!最好有例子(含源代码)!!
其中,日志文件是指向数据库写入记录时间、用户登陆名称、操作等等
...全文
24 点赞 收藏 3
写回复
3 条回复
切换为时间正序
当前发帖距今超过3年,不再开放新的回复
发表回复
no_com 2002-05-11
Sub 记录日志(业务描述 As String, 库名 As String, 关联号 As String, 备注 As String)
Dim cnttt As New ADODB.Connection
Dim cmttt As New ADODB.Command
Dim rsttt As New ADODB.Recordset
cnttt.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=zqh1;Initial Catalog=clgl;Data Source=" & readstart
cnttt.Open
cmttt.ActiveConnection = cnttt
rsttt.CursorLocation = adUseClient
rsttt.Open "set dateformat ymd", cnttt, 3, 1

Dim a As New mydategoto
Dim sj
sj = a.sql日期
ttime = a.显示时间
Set a = Nothing
cmttt.CommandText = "insert into 系统日志 values(" & 取回最大ID号("系统日志") + 1 & ",'" & sj & "','" & ttime & "','" & user.username & "','" & 业务描述 & "','" & 库名 & "','" & 关联号 & "','" & 备注 & " ')"
cmttt.Execute


cnttt.Close
回复
feng225 2002-05-11
指的是对文件进行的增.删,改等
急用,多谢
回复
lvjack 2002-05-11
操作信息是指什么,文件操作?打了什么字?能不能说的再清楚点
回复
发动态
发帖子

1180

社区成员

VB 数据库(包含打印,安装,报表)
申请成为版主
社区公告
暂无公告