A. 求VB登陆窗口连接ACCESS数据库的代码
1、DimobjCnAsNewConnection,objRsAsNewRecordset
objCn.ConnectionString="Provider=Microsoft.Jet.OLEDB.3.51;"&"DataSource="&App.Path&objCn.Open
2、dimobjCnAsConnection
SetobjCn=NewConnection
objCn.Open“DSN=实例2DSN”
3、ADOData控件创建连接
(1)代码链接access数据库扩展阅读
ACCESS数据库特性
1、access有强大的数据处理、统计分析能力，利用access的查询功能，可以方便地进行各类汇总、平均等统计。并可灵活设置统计的条件。
2、access用来开发软件，比如生产管理、销售管理、库存管理等各类企业管理软件，其最大的优点是：易学，非计算机专业的人员，也能学会。
3、在开发一些小型网站WEB应用程序时，用来存储数据。例如ASP+Access。这些应用程序都利用ASP技术在InternetInformationServices运行．比较复杂的WEB应用程序则使用PHP/Mysql或者ASP/MicrosoftSQLServer。
B. JAVA 连接access2010数据库连接
JAVA 连接access2010数据库都是固定几种方法，以下是在网上找的一些方法，
示例代码：
import java.sql.*;
public class ConnectAccess {
/**
* 注意：
* 1：先建立一个access文件xxx.mdb,并放在制定盘符X:/下;
* 2：在数据库文件xxx.mdb中建立一个表Tablexx1；
* 3：为Table1添加一列，并插入至少一条记录；
*/
public static void main(String args[]) throws Exception {
ConnectAccess ca=new ConnectAccess();
ca.ConnectAccessFile();
ca.ConnectAccessDataSource();
}
/**
* 方法一：直接连接access文件。
*/
public void ConnectAccessFile() throws Exception {
Class.forName("sun.jdbc.odbc.JdbcOdbcDriver");
String dbur1 = "jdbc:odbc:driver={Microsoft Access Driver (*.mdb)};DBQ=X://xxx.mdb";
Connection conn = DriverManager.getConnection(dbur1, "username", "password");
Statement stmt = conn.createStatement();
ResultSet rs = stmt.executeQuery("select * from Tablexx1");
while (rs.next()) {
System.out.println(rs.getString(1));
}
rs.close();
stmt.close();
conn.close();
}
/**
* 方法二：采用ODBC连接方式
* 在windows下，【开始】-->【控制面板】-->【性能和维护】-->【管理工具】-->【数据源】，在数据源这里添加一个指向xxx.mdb文件的数据源。
* 比如创建名字为xxxxS1
*/
public void ConnectAccessDataSource()throws Exception {
Class.forName("sun.jdbc.odbc.JdbcOdbcDriver");
String dbur1 = "jdbc:odbc:xxxxS1";// 此为ODBC连接方式
Connection conn = DriverManager.getConnection(dbur1, "username", "password");
Statement stmt = conn.createStatement();
ResultSet rs = stmt.executeQuery("select * from Tablexx1");
while (rs.next()) {
System.out.println(rs.getString(1));
}
rs.close();
stmt.close();
conn.close();
}
}
C. 如何使用ODBC来连接ACCESS数据库
作步骤如下：
（1）单击“开始”按钮，选择“程序”→“管理工具”→“数据源（ODBC）”命令，打开“ODBC数据源管理器”对话框，打开“系统DSN”选项卡。
（2）单击“添加”按钮，打开“创建新数据源”对话框，选择安装数据源的驱动程序，这里选择“Microsoft Access Driver (*.mdb)”，如图2.6所示。
选择安装数据源的驱动程序
（3）单击“完成”按钮，打开“ODBC Microsoft Access 安装”对话框，填写“数据源名”及相关“说明”，并指定所要连接数据库的路径，如图2.7所示。
“ODBC Microsoft Access 安装”对话框
（4）单击“确定”按钮，完成配置系统DSN的操作。
使用ODBC方法连接Access数据库的代码如下：
例程2-2 代码位置：光盘\mr\2\2.2\2.2.1\02\conn.asp
<%
Dim Conn
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "DSN=AccessDSN"
%>
如果Access数据库设有密码，可以使用以下代码连接数据库：
<%
Dim Conn
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.Open "DSN=AccessDSN;uid=admin;pwd=123456;"
%>
D. 如何用vba代码将access数据库连接求代码
下面这段程序是连接数据库，并将excel表格内容写入数据库。代码如下：
Sub FYMXDL()
Dim XQID As Integer
Dim JZID As Integer
Dim FYID As Integer
Dim FBXZ As String '分包性质
Dim DW As String
Dim SARR(1 To 31) As Double
Dim rst As New ADODB.Recordset
mYpath = ThisWorkbook.Path & "\jzfydata.accdb"
Set cONn = CreateObject("ADODB.Connection")
cONn.ConnectionString = "Provider=Microsoft.Ace.OleDB.12.0;Data Source=" & mYpath
cONn.ConnectionString = cONn.ConnectionString & ";Jet OLEDB:Database "
cONn.Open
XQID = Cells(3, 2).Value
JZID = Cells(3, 5).Value
'清空改小区-建筑的费用明细
Sql = "delete from fymxb where 小区ID=" & XQID & " AND 建筑ID = " & JZID
cONn.Execute Sql
Const kshh = 7
hh = kshh
Do While Cells(hh, 3).Value > 0
FYID = Cells(hh, 3).Value
FBXZ = Cells(hh, 11).Text
For i = 1 To 31
SARR(i) = Round(Cells(hh, 13 + i - 1).Value, 2)
Next i
Sql = "INSERT INTO fymxb(小区ID,建筑ID,费用ID,分包性质,工作量,单价合计_中标,人工费_中标, 主材费_中标, 辅材费_中标, 机械费_中标, 管理费_中标, 利润_中标,规费_中标,税金_中标,合价_中标,单价合计_标准成本,人工费_标准成本,主材费_标准成本,辅材费_标准成本,机械费_标准成本,管理费_标准成本,利润_标准成本,规费_标准成本,税金_标准成本,合价_标准成本,单价合计_实际成本,人工费_实际成本,主材费_实际成本,辅材费_实际成本,机械费_实际成本,管理费_实际成本,利润_实际成本,规费_实际成本,税金_实际成本,合价_实际成本) VALUES (" & XQID & ", " & JZID & ", " & FYID & ", '" & FBXZ & "'"
For i = 1 To 31
Sql = Sql & "," & SARR(i)
Next i
Sql = Sql & " )"
cONn.Execute Sql
hh = hh + 1
Loop
End Sub
E. 如何用vb连接access数据库(代码编写)
app.path是指程序的相对路径。可以防止你写绝对路径后，如你的电脑可能有G盘，而其他人的电脑里没有G盘，那你写的绝对路径就不可用，程序也就相对他来讲是处废品。app.path可获取到你正在运行的程序的路径，能存放你程序的路径，那他下面也就可以再存你的数据库（你可以在这目录下再新一个文件夹存数据库）
rs1.Open
sql,
cn
其中cn是连接对象，rs1是记录集，sql是查询语句
你都知道这三个变量的意思，这句话也应该不难理解。直接译出来
sql
=
"select
*
from
表名"
检索“表名”里的所有记录
rs1.close是关闭rs1.open语句的。
引号里的是字符串
加号是连接符，通加在不作加减运算时最好是用"&"代替。可防止出错。
如
a="123"+"456"
a的结果是"123456"
a="123"
&
"456"
a的结果还是"123456"
下面没有加引号是数值可以用作运算计算出结果。上面的是字符串不能运算出结果。
a=123+456
a的结果是579
a=123
&
456
a的结果还是123456
F. c语言连接Access数据库如何实现标准的c语言
1、C/C++与数据库交互，像 mssql/ mysql / oracle 等，一般都有成熟的第三方库，这些库里面无非就是封装了与数据库通讯的方式和通讯协议搜一下要用的数据库相关的 API 文档，会说得很清楚任何文件都是二进制数据，关键是数据存储的组织方式通用扩展名的文件，像gif/doc/jpg/wav，格式都是固定的。
2、举个例子，连接SQL：
//打开数据库
strDBClass.Format(_T("Provider=Microsoft.Jet.OLEDB.4.0;DataSource=%s;JetOLEDB:DatabasePassword=%s"),m_strUnEntryptMdbFilePath,m_strMDBPassword);
//创建连接
HRESULThr=m_pConnection.CreateInstance(_uuidof(Connection));
_ConnectionPtrm_pConnection->Open(m_strDBClass,_T(""),_T(""),adConnectUnspecified);
//声明表单指针
_RecordsetPtrpBandRecordset;
pBandRecordset.CreateInstance(__uuidof(Recordset));
//执行语句
CStringstrSQL（L"SELECT*FROM[Band]"）;
m_pConnection->Execute((LPCTSTR)strSQL,NULL,0);
//提取某一项例如BandInfo
intiBandInfo=wcscmp(colum,L"BandInfo");
while(!recordsetPtr->adoEOF)
{
var=recordsetPtr->GetCollect(colum);
if(var.vt!=VT_NULL)
strName=(LPCSTR)_bstr_t(var);
recordsetPtr->MoveNext();
}