用VB创建Access表格

原创 2011年09月06日 14:10:47

'用VB创建Access表格:

'如果程序比较复杂,可添加引用:Microsoft Asctivex Data Objects 2.5 LibraryPrivate

 Private Sub Command1_Click()
    On Error Resume Next
    db = "d:\aa.mdb"
    If Dir(db) = "" Then CreateObject("ADOX.Catalog").Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
    If Dir(db) = "" Or Err <> 0 Then If MsgBox("数据库创建失败!", 48) <> vbYes Then Exit Sub
    Set con = CreateObject("ADODB.Connection")
    Set rs = CreateObject("ADODB.Recordset")
    con.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & db
    Set rs.ActiveConnection = con
    rs.open "create table aaa (aa char(2),bb date,cc int)"
    rs.open "insert into aaa (aa,bb,cc) values ('aa',#" & Now & "#,11)"
    rs.open "select * from aaa"
    If Not rs.EOF Then
        For i = 0 To rs.fields.Count - 1
            Print "字段名:"; rs.fields(i).Name, "字段值:"; rs.fields(i)
        Next
    End If
    rs.Close
End Sub

 

vb.net office excel 和wps共存,创建正确的excel对象以便操作excel表格

vb.net office excel 和wps共存,创建正确的excel对象以便操作excel表格

C#创建Access数据库、表格、并向表格中添加数据

C#创建Access数据库以及表,并向表格添加数据本文主要演示如何通过C#创建Access数据库以及表格,并向表格中添加列。...

VB ACCESS数据库的修改、删除、添加

VB  ACCESS数据库的修改、删除、添加 Private Sub Command1_Click() Dim s As String Dim Conn As New ADODB.Con...

vb.net操作数据库之ACCESS(一)

转载自:http://blog.csdn.net/machong8183/article/details/5488191 一直想写下数据库操作方面的,只是没什么时间(好像是借口,应该是懒或者没心情吧...
  • lengyff
  • lengyff
  • 2015年04月05日 11:26
  • 741

在VB6.0中设置ADO控件属性连接Microsoft ACCESS 2007数据库

在VB6.0中设置ADO控件属性连接Microsoft ACCESS 2007数据库        使用VB6.0一般支持.mdb格式的数据库,为了能够使VB6.0能连接.accdb格式的数据库,需要...
  • ttpage
  • ttpage
  • 2013年06月24日 13:55
  • 2181

vb.net合伙数据库access(二)——数据绑定控件成功

当我们已经建立了vb.net和数据库access的链接之后随后显示数据就会非常的简单了,其实就是以前我们学习过的对于一个控件进行了数据的绑定,根本不需要任何的代码,而这节不仅单单是教大家如何显示数据,...

VB6.0中连接加密的Access数据库

一、建立数据库  因为在Visual Basic 6.0中有的数据库连接方式不支持Access 2000版本格式的数据库,为了便于说明问题,本文所提的数据库以Access 97版本数据库为例。  在M...

vb.net Access 读写图片

这个问题困扰我好长时间,网上找了很多资料,有用的不多,最终还是解决了这个问题,有类似问题的朋友可以参考一下,虽然代码写的不好 创建一个窗体,窗体上访两个按钮和一个图片框(PictureBox...
  • LZC_456
  • LZC_456
  • 2013年12月31日 12:38
  • 989

VB.NET操作ACCESS数据库读取存入图片

一、准备工作     在ACCESS数据库中,将字段声明为 OLE链接 类型 二、将图片框中图片转化成二进制数组的方法         Dim MyStream As New System.IO....
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:用VB创建Access表格
举报原因:
原因补充:

(最多只允许输入30个字)