以access数据库为例,Window7
系统,配置数据源,操作步骤如下:
1、打开电脑,点击开始菜单。
2、打开<控制面板>。
3、在<调整计算机的设置>中,点击<系统和安全>。
4、点击<管理工具>。
5、点击<数据源(ODBC)>。
6、点击<系统用户>,然后,点击按钮<添加>。
7、在<创建数据源>里,找到Microsoft
Access
Driver(*.mdb),选中.然后点击完成。
8、在<ODBC
Microsoft
Access
安装>的<数据源名(N)>,填写数据有名称,然后点击<数据库>中的<选择(S)...>。
9、在<选择数据库>里,<目录(D):>里,按路径找到数据库文件,选中,点击确定。回到<ODBC
Microsoft
Access
安装>点击确定。最后回到<ODBC数据源管理器>,点击确定,完成配置。
⑵ 如何新建ODBC并设置系统DSN
DataSourceName =NetmarbleTestDB
DBQPath = NetmarbleTestDB.mdb
Public Const HKEY_LOCAL_MACHINE = &H80000002
Public Const REG_SZ = 1 'Constant for a string variable type.
Public Const REG_BINARY = 3 'Constant for Binary
Public Const REG_DWORD = 4 '32-bit number
'Creates a Key In Registry
Public Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
'API FOR STRING
Public Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long
'API FOR DWORD
Public Declare Function RegSetValueExA Lib "advapi32.dll" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, ByRef lpData As Long, ByVal cbData As Long) As Long
'API FOR BINARY
Public Declare Function RegSetValueExB Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, ByRef lpData As Byte, ByVal cbData As Long) As Long
'API for closing the Registry Key
Public Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long
Public Declare Function GetWindowsDirectory Lib "kernel32" Alias "GetWindowsDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long
Public Declare Function GetSystemDirectory Lib "kernel32" Alias _
"GetSystemDirectoryA" (ByVal lpBuffer As String, _
ByVal nSize As Long) As Long
Public Declare Function GetTempPath Lib "kernel32" Alias "GetTempPathA" _
(ByVal nBufferLength As Long, ByVal lpBuffer As String) As Long
Public Function CreateDSN(DataSourceName As String, DBQPath As String, UID As String, Password As String) As Boolean
Dim DatabaseName As String
Dim Description As String
Dim DriverPath As String
Dim DriverName As String
Dim LastUser As String
Dim Regional As String
Dim Server As String
Dim lResult As Long
Dim hKeyHandle As Long
Dim Engines As String
Dim Jet As String
Dim Driver As String
Dim DriverId As Long
Dim FIL As String
Dim SafeTransaction As Long
Dim ImplicitCommitSync As String
Dim MaxBufferSize As Long
Dim PageTimeOut As Long
Dim Threads As Long
Dim UserCommitSync As String
CreateDSN = True
Engines = "Engines"
Jet = "Jet"
FIL = "MS Access;"
DriverId = &H19
SafeTransaction = &H0
ImplicitCommitSync = ""
MaxBufferSize = &H800
PageTimeOut = &H5
Threads = &H3
Driver = GetSystemPath & "\odbcjt32.dll"
DriverName = "Microsoft Access Driver (*.mdb)"
'Create the new DSN key.
lResult = RegCreateKey(HKEY_LOCAL_MACHINE, "SOFTWARE\ODBC\ODBC.INI\" & DataSourceName, hKeyHandle)
If lResult <> 0 Then
CreateDSN = False
MsgBox "Write to REG failed, please login as administrator", vbCritical + vbOKOnly
End If
'DBQ
lResult = RegSetValueEx(hKeyHandle, "DBQ", 0&, REG_SZ, ByVal DBQPath, Len(DBQPath))
'Driver
lResult = RegSetValueEx(hKeyHandle, "Driver", 0&, REG_SZ, ByVal Driver, Len(Driver))
lResult = RegSetValueExA(hKeyHandle, "DriverId", 0, REG_DWORD, DriverId, 4) 'write the value
'FIL
lResult = RegSetValueEx(hKeyHandle, "FIL", 0&, REG_SZ, ByVal FIL, Len(FIL))
lResult = RegSetValueExA(hKeyHandle, "SafeTransaction", 0, REG_DWORD, SafeTransaction, 4) 'write the value
'Password
lResult = RegSetValueEx(hKeyHandle, "PWD", 0&, REG_SZ, ByVal Password, Len(Password))
'UID
lResult = RegSetValueEx(hKeyHandle, "UID", 0&, REG_SZ, ByVal UID, Len(UID))
lResult = RegCreateKey(HKEY_LOCAL_MACHINE, "SOFTWARE\ODBC\ODBC.INI\" & DataSourceName & "\" & Engines, hKeyHandle)
lResult = RegCreateKey(HKEY_LOCAL_MACHINE, "SOFTWARE\ODBC\ODBC.INI\" & DataSourceName & "\" & Engines & "\" & Jet, hKeyHandle)
'ImplicitCommitsync
lResult = RegSetValueEx(hKeyHandle, "ImplicitCommitSync", 0&, REG_SZ, ByVal ImplicitCommitSync, Len(ImplicitCommitSync))
'MaxBufferSize
lResult = RegSetValueExA(hKeyHandle, "MaxBufferSize", 0, REG_DWORD, MaxBufferSize, 4) 'write the value
'PageTimeOut
lResult = RegSetValueExA(hKeyHandle, "PageTimeOut", 0, REG_DWORD, PageTimeOut, 4) 'write the value
'Threads
lResult = RegSetValueExA(hKeyHandle, "Threads", 0, REG_DWORD, Threads, 4) 'write the value
'UserCommitSync
lResult = RegSetValueEx(hKeyHandle, "UserCommitSync", 0&, REG_SZ, ByVal UserCommitSync, Len(UserCommitSync))
'Close the new DSN key.
lResult = RegCloseKey(hKeyHandle)
lResult = RegCreateKey(HKEY_LOCAL_MACHINE, "SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources", hKeyHandle)
lResult = RegSetValueEx(hKeyHandle, DataSourceName, 0&, REG_SZ, ByVal DriverName, Len(DriverName))
lResult = RegCloseKey(hKeyHandle)
End Function
Public Function GetSystemPath() As String
Dim sysPath As String
sysPath = String(255, 0)
Call GetSystemDirectory(sysPath, 256)
sysPath = Left(sysPath, InStr(1, sysPath, Chr(0)) - 1)
GetSystemPath = sysPath
End Function
Public Function GetWindowsPath() As String
Dim sysPath As String
sysPath = String(255, 0)
Call GetWindowsDirectory(sysPath, 256)
sysPath = Left(sysPath, InStr(1, sysPath, Chr(0)) - 1)
GetWindowsPath = sysPath
End Function
⑶ 如何配置ODBC数据源
以WINDOWS XP下配置SQL SERVER的ODBC数据源为例
第一步 在控制面板下选择 管理工具--ODBC数据源,双击图标
第二步 在用户DSN 选项卡片上,点“添加”按钮,出现创建新数据源对话框,选择SQL Server
第三步 输入数据源名称、数据源描述和SQL Server 所在的服务器名称或者IP地址。服务器名称可以是SQL Server所在的机器名称,也可以是IP地址。单击下一步按钮。
第四步 选择登录SQL Server时的身份验证方式。并输入登录SQL Server时所用到的用户名和密码。这里的用户名和密码是在SQL Server中建立的。
第五步 在更改默认的数据库填选择数据库名,点击下一步。
第六步,点击完成,并测试数据源,测试成功后就完成ODBC数据源的创建了。
⑷ 如何用代码配置ODBC数据源
假如你用的是Access数据库:控制面板——管理工具——数据源(ODBC)——系统DNS(用户DNS也可)——添加——Microsoft
Access
Driver
——输入数据源名称——找到你的数据库
这样就差不多了,如果用的是sql则把DRIVER处换成SQL
SEVRER的就可以了,希望能帮到你,祝好运!
⑸ 如何配置ODBC数据源(以Access数据库为例)
以access数据库为例,Window7 系统,配置数据源,操作步骤如下:
1、打开电脑,点击开始菜单。
⑹ 如何配置数据库ODBC数据源
1
点击开始菜单
2
打开<控制面板>.
3
在<调整计算机的设置>中,点击<系统和安全>.
4
点击<管理工具>.
5
点击<数据源(ODBC)>.
6
点击<系统用户>,然后,点击按钮<添加>.
7
在<创建数据源>里,找到Microsoft Access Driver(*.mdb),选中.然后点击完成.
8
在<ODBC Microsoft Access 安装>的<数据源名(N)>,填写数据有名称,然后点击<数据库>中的<选择(S)...>
9
在<选择数据库>里,<目录(D):>里,按路径找到数据库文件,选中,点击确定. 回到<ODBC Microsoft Access 安装>点击确定.最后回到<ODBC数据源管理器>,点击确定.完成配置.
⑺ 如何新建odbc
你的意思是怎样来配置一个ODBC来在编程时应用吧?可以按照下面的步骤做:
1、通过修改注册表加载数据源:
·用户数据源:HKEY_CURRENT_USER\SOFTWARE\ODBC\ODBC.INI
·系统数据源:HKEY_LOCAL_MACHINE\SOFTWARE\ODBC\ODBC.INI
对于不同类型的数据源,注册表的修改也不同,但基本上要修改两个地方,一个是在ODBC.INI子键下建立一个与数据源描述名同名的子键,并在该子键下建立与数据源配置相关的项;另一个是在\ODBC.INI\ODBC Data Sources子键下建立一个新项以便告诉驱动程序管理器ODBC数据源的类型。
2、通过ODBC API加载:Windows系统子目录下的动态链接库ODBCinst.dll提供了一个可以动态增加、修改和删除数据源的函数SQLConfigDataSource,由于VC的默认库文件中不包含此函数,因此使用前需将ODBCinst.h文件包含在工程的头文件中,在工程的setting属性框Link页的Object/library mole编辑框中增加ODBC32.lib,同时保证系统目录system32下有文件ODBCcp32.dll。
3、文件数据源的连接:除了ODBC管理器,还可以通过SQLDriverConnect来添加文件数据源。
⑻ win7怎么配置odbc数据源
win7下ODBC数据源ACCESS2003的链接
直接在
控制面板---管理工具----数据源(ODBC)
打开数据源配置,发现只有SQLServer的驱动,其他的都没有了。
解决方法是:
C:\Windows\SysWOW64
在这个目录下找到:
odbcad32.exe
这个文件,双击打开。
里面有很多可用个数据源驱动,然后就可用添加连接Access的ODBC的数据源了。