以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的数据源了。
