我正准备用ADO对象（就是ADOODBC）进行处理，现在我已经能删除ACCESS数据库中的数据了，正在做定时删除指定时间范围的程序，完成后会告诉你的 WWW_PL※CJS_COM－PLC－技.术_网
匿名回复：WW.W_PLC※JS_C,OM－PL,C－技.术_网
我也有点进展了,我们多交流一下,谢谢,QQ:32421159 plcjs.技.术_网
匿名回复：W1WW_P4LCJS_COM－PLC－技.术_网
Dim cnn As ADODB.ConnectionWW.W_PLC※JS_C,OM－PL,C－技.术_网
Dim rs As ADODB.Recordset plcjs.技.术_网
匿名回复：WWW_PL※CJS_COM－PLC－技.术_网
大狗兄弟,留个QQ好吗,这里说话不方便 WWW_P※LCJS_COM－PLC－)技.术_网
匿名回复：WW.W_PLCJS_COM－PLC－技.术_网
Dim sql As StringWW.W_PLCJS_COM－PLC－技.术_网
Dim ConnectionString As StringP.L.C.技.术.网——可编程控制器技术门户
Dim DateNow As DateWWW_PLCJS_COM－PLC－技.术_网
DateNow = System.CurrentDateWW.W_PLCJS_COM－PLC－技.术_网
DateNow = DateAdd("d", -3, DateNow)WWW_PLCJ－S_COM－PLC－技.术_网(可－编程控－制器技术－门户)
Dim strDateNow As StringWWW_PLCJS※COM－PLC－技×术_网(可编程控※制器技术门户)
strDateNow = DateNowWWW.PLCJS.COM——可编程控制器技术门户
Set cnn = New ADODB.ConnectionWWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)
Set rs = New ADODB.RecordsetWWW.PLCJS.COM——可编程控制器技术门户
cnn.CursorLocation = adUseClientWWW_PLCJS※COM－PLC－技.术_网(可※编程控※制器技术门户)
cnn.ConnectionString = "dsn=WWW;uid=;pwd=;database=WWW"P.L.C.技.术.网——可编程控制器技术门户
cnn.Open W1WW_P4LCJS_COM－PLC－技.术_网
匿名回复：WW.W_PLCJS_COM－PLC－技.术_网
WWW.PLCJS.COM——可编程控制器技术门户
rs.CursorType = adOpenKeysetplcjs.技.术_网
rs.LockType = adLockOptimisticWWcW_PLCJS_COM－PLC－技.术_网
rs.Open sql, cnn, adOpenDynamicWWW_PL※CJS_COM－PLC－技.术_网
Fix32.THISNODE.WZY_ADOAI = rs.RecordCountWWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)
cnn.Close WW.W_PLCJS_COM－PLC－技.术_网
匿名回复：WWW_PLCJS_COM－PLC－技.术_网
自己的问题自己解决！没什么人能主动关心一只狗的！！WWW※PLCJS_COM－PL＃C－技.术_网(可编※程控※制器技术门户)
先在IFIX的VB编辑器下工具->引用下添加对MICROSOFT ACTIVEX DATA OBJIECTS 2。7和crystal report9 activex designer及crystal report VIEWER CONTROL的引用，然后看我发给你的程序，其中兰色和粉色是有用的，粉色是重点，别忘了在IFIX画面编辑器下添加crystal report VIEWER CONTROL对象，也就是程序中的CRViewer1对象，添加方法是在工具箱中选择“插入OLE对象”，选择crystal report VIEWER CONTROL，一切OK！有关报表设计等问题可利用水晶报表编辑器搞定，查询方式就看你怎么整了，基本是想怎么整就怎么整，就这么简单！