- 博客(7)
- 资源 (5)
- 收藏
- 关注
RSS订阅原创 VB使用ADODB操作数据库的常用方法
ADO常用方法下面是我所掌握的使用ADO对数据库操作的一些常用方法，主要是提供给初学者作为参考，有不对的地方请指正。如有补充不胜荣幸准备工作========Dim conn As New ADODB.Connection 创建一个 Connection 实例，在这里使用New等于将Dim和Set合并为一段代码执行Dim rs As ADODB.Recordset 创建一个 Recor
2009-07-02 09:03:00
538
原创 在VB中压缩ACCESS数据库
如果您在Access数据库、Access项目中删除数据或对象，可能会产生碎片并导致磁盘空间使用效率的降低。同时，数据库文件的大小并未减小，而是不断的增大，直至您的硬盘没有空间。有没有好的处理方法呢？其实，在Access中可以对数据库进行压缩优化以提升Access数据库和Access项目的性能，这样的压缩处理的实质是复制该文件，并重新组织文件在磁盘上的存储方式。但是，在Access项目中进行这样的压
2009-07-01 08:44:00
571
转载 数据库压缩
窗体加一个Command控件，点击控件即可完成，把下列代码全部复制到窗体上。 Dim s As StringPrivate Sub Command1_Click() On Error Resume Next Dim sNewName As String Dim sBakFile As String Dim sDataBase As String sNewName = s
2009-06-30 21:06:00
482
转载 VB 数据备份、还原
新建一个窗口，添加2个Command控件，1个Text控件，1个Drive控件，1个File，进行数据的备份和还原，代码如下：Private Sub Command1_Click() msg = MsgBox("是否确定需要备份？", 1, "数据备份") Text1.Visible = True Drive1.Visible = True Text1.Text = "备份至"End
2009-06-30 21:06:00
924
原创 压缩、修复ACCESS 复制 ACCESS
Private Sub Command1_Click() Sou: 源mdb文件路径和名称；Des: 目标mdb文件路径和名称 引用 Microsoft Jet and Replication Objects 2.6 Dim miJRO As JRO.JetEngine Set miJRO = New JRO.JetEngine miJRO.CompactDataba
2009-06-30 14:02:00
708
转载 VB当中的颜色代码
颜色常数颜色常数 值 描述 vbBlack &H0 黑色 vbRed &HFF 红色 vbGreen &HFF00 绿色 vbYellow &HFFFF 黄色 vbBlue &HFF0000 兰色 vbMagenta &HFF00FF 洋红 vbCyan &HFFFF00 青色 vbWhite &HFFFFFF 白色 系统颜色常数 值 描述 vbScrollBars &H80000000 滚动条颜
2009-05-29 16:24:00
18296
2
原创 关于VB如何引用VB6STKIT.DLL
Private Declare Function fCreateShellLink Lib "vb6stkit.DLL" (ByVal lpstrFolderName As String, ByVal lpstrLinkName As String, ByVal lpstrLinkPath As String, ByVal lpstrLinkArgs As String, ByVal fPriv
2008-03-10 14:43:00
1222
PDF文件 阅读控件 (VeryPDF PDFView OCX)
2009-06-30
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人