VB如何使用资源文件?想加入一个ACCESS数据库到资源文件..

加入ACCESS数据库到资源文件里,文件号101,custom
一打开EXE文件就需要用到ACCESS数据库登陆,窗口运行时该如何编写代码?
请高手帮帮忙!!

Dim bytdata() As Byte
intFile = FreeFile()
bytdata = LoadResData(101, "CUSTOM")
'101 为资源号,custom为资源类型
strtmpfile =app.path + "\a.mdb"
'临时文件的路径与文件名
Open strtmpfile For Binary Access Write As #intFile
Put #intFile, , bytdata
Close (intFile)

'然后就会有一个a.mdb的数据库文件追问

退出了程序后,数据库文件不会消失?直接显示在根目录下...
可不可以退出程序后数据库文件也消失掉的?打开程序后才会显示出来.

追答

Kill strtmpfile

追问

Private Sub Form_Unload(Cancel As Integer)
Kill strtmpfile
End Sub
是不是这样哦,怎么退出时会提示类型不匹配的呢?

追答

strtmpfile定义成全局变量试试看看

温馨提示:内容为网友见解,仅供参考
无其他回答

如何用vb建立一个access数据库?
使用VB建立Access数据库,首先定义表与字段。通过`Workspaces(0)`打开指定的Access数据库文件,然后使用`CreateTableDef`创建新表。创建新表时,需定义表的字段,包括字段名和数据类型。字段名使用`CreateField`方法指定,数据类型如`dbText`、`dbInteger`等通过参数传递。例如,创建名为"Name"的字段,类型...

vb 程序怎么在局域网中 连接ACCESS 数据,使客户端和服务端可以随意访问...
首先你的程序和ACCESS数据库要放在同一目录(或者数据库放在程序目录内的子目录);程序内要用app.path来指定数据库的路径,不要用绝对路径(如D:\\MyData\\123.mdb);程序打包生成setup文件,在你两台电脑中的任意一台安装一下,然后把安装后的程序所在目录设为共享(要设为可修改);在另一台电脑中...

VB如何调用系统当中的Access程序找到某路径的.mdb文件并且打开它_百 ...
我想这个要用到Common Dialog控件 ,打开工程(project)>>>部件(components) , 勾选Microsoft Common Dialog Control 6.0 点击确定。 在窗体上画一个CommonDialog控件(默认名为CommonDialog,并且在他的Filter属性窗口里面写入“数据库文件(*.mdb)|*.mdb ” 或者 在代码里面写入:CommonDialog1.Fil...

如何用vb建立一个access数据库
1、找好要存放数据库的路径,如C盘data路径;2、路径下空白处点右键,新建-Microsoft Access数据库,如图:3、这时路径下就有了一个access文件,可以右键-重命名来为数据库起名,如,起名叫测试数据库;4、双击access文件,在里边创建所要的表,函数等等即可。

vba 中如何使用资源文件
vba利用FileSystemObject对象来处理文件 FileSystemObject对象模型,是微软提供的专门用来访问计算机文件系统的,具有大量的属性、方法和事件。其使用面向对象的“object.method”语法来处理文件夹和文件,使用起来十分方便(需Office 2000以后版本)。FileSystemObject并不是VBA的一部分,它是以一个COM组件的形式提供...

怎样用VB调用ACCESS中建立好的数据库中的数据?
首先你需要在部件中把这两个部件添加到工具栏中并将他们拖到窗口中 上面那个是VB连接数据库的必要的一个部件,我说一下大致的步骤吧 1.先把上面第一个部件拖到Frm1上,接着新建一个模块并输入下面这串代码 红色框内是你的数据库名称 打完之后先保存模块才能生效 2.在当前Frm1里面建几个text分别...

VB连接Access数据库具体步骤,越详细越好
有多种连接方式,可以用数据控件连接,也可以用组件连接。下面是用ADO组件来连接的例子(假定ACCESS数据库文件和程序是放在同一个文件夹的):Private Sub Form_Click() '点击窗体运行Dim conn As Object, rs As ObjectSet conn = CreateObject("Adodb.Connection")conn.Open "provider=Microsoft.Jet....

...了一个人事档案管理系统,单机用的,数据库是ACCESS,现在想在局域网上...
把ACCESS在局域网专门有台电脑共享,然后在VB程序中指定这个文件的目录,然后在其他机器把该共享的目录映射为本地磁盘Z(越后面的盘符越好),把程序的数据库路径改为 z:\/数据库名就可以啦.

如何把Access与VB连接起来
1)打开电脑上的ODBC数据源。如下图所示:2)点击添加。3)命名 。4)和数据库源建立关系。5)用代码实现连接。3,ADO Data 控件创建连接。1)右击data控件,选择ADODC属性。2)从三种连接资源中选择一种。使用data Link 文件:直接点击浏览,找到包含连接字符串的.udl文件即可,使用ODBC数据源连接,...

VB如何外接ACCESS数据库(.MDB文件)
FrmMain.Toolbar1.Buttons(2).Enabled = False FrmMain.StatusBar1.Panels(2).Text = "当前用户为: " & userID & " 只能流览数据"End If FrmMain.Show Unload Me End SubPrivate Sub Form_Load()On Error GoTo myError Dim Dname As String Dname = App.Path If Right(Dname, 1) <>...

相似回答