Explicación detallada del establecimiento de la fuente de datos directamente a través del programa sin
WINDOWS
( acceso vb al registro )
El
VENTANAS
fuente de datos
se establece a través del programa
,
y que se puede realizar a través de la API de la función
en
VB
. Esto no es lo que este artículo va a discutir . Aquí se debe principalmente a utilizar el WshShell objeto de permitir VB para operar convenientemente el registro para lograr el propósito de establecer una fuente de datos de WINDOWS . Después de leer este artículo, está más que aprender a crear fuentes de datos a través de programas.
(1) La
base teórica del uso de
WshShell para
operar el registro
Puede consultar
la " Explicación detallada del objeto WshShell " reimpresa en mi
BLOG
. Este artículo explica cómo operar el registro en detalle, y vale la pena leerlo detenidamente.
(3) Establecer sub-referencias de casos de fuentes de datos a través de procedimientos
Requisitos del caso:
ahora, después de instalar un software de administración de base de datos, el establecimiento de la fuente de datos (DSN) se completa automáticamente al iniciar sesión por primera vez, sin que el cliente tenga que reconstruir manualmente la fuente de datos en el sistema Windows. Las fuentes de datos que deben establecerse son las siguientes
1)
Utilice el programa para crear automáticamente un ODBC para conectarse a SQL Server. Necesita conectarse al servidor SQL llamado rcscpc en la red de área local. La conexión adopta la autenticación de SQL Server, UID = sa, PWD = sa, y el valor predeterminado nombre de la base de datos para la conexión: rcsc
2)
Utilice el programa para crear automáticamente el ODBC utilizado para conectarse a ACCESS, y la base de datos de ACCESS que se conectará está en la máquina remota
Operación específica:
1)
Primero, VB necesita hacer referencia a wshom.ocx; de lo contrario, el compilador no reconocerá el objeto WshShell y consultará el método. En VB, seleccione "Referencia" en "Proyecto" y enganche el gancho delante de "Objeto de host de Windows Script Modelo "..
2)
Declare el objeto WshShell en el módulo o declaración general, el código es el siguiente:
Opción explícita
Atenuar un WshShell como nuevo
3)
El código principal para operar el registro:
Sub privado Form_Load ()
'Escribir automáticamente rsdl-Odbc
Dim bm como variante
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong /", ""
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / rsdl / Database", "rcsc"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / rsdl / Driver", "C: /WINDOWS/system32/sqlsrv32.dll"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / rsdl / LastUser", "sa"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / rsdl / Server", "rcscpc"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / ODBC Data Sources / rsdl", "SQL Server"
'Escribir automáticamente feiyong-odbc
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong /", ""
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / DBQ", "//196.114.113.128/db/zongku.mdb"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / Driver", "C: /WINDOWS/system32/odbcjt32.dll"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / DriverId", & H19, "REG_DWORD"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / Exclusive", & O0, "REG_BINARY"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / FIL", "MS Access;"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / ReadOnly", & O1, "REG_BINARY"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / SafeTransactions", & H0, "REG_DWORD"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / UID", ""
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / Engines /", ""
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / Engines / Jet /", ""
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / Engines / Jet / ImplicitCommitSync", ""
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / Engines / Jet / MaxBufferSize", & H800, "REG_DWORD"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / Engines / Jet / PageTimeout", & H5, "REG_DWORD"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / Engines / Jet / Threads", & H3, "REG_DWORD"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / feiyong / Engines / Jet / UserCommitSync", "Sí"
a.RegWrite "HKLM / SOFTWARE / ODBC / ODBC.INI / ODBC Data Sources / feiyong", "Driver do Microsoft Access (* .mdb)"
End Sub
En el código anterior, REG_BINARY representa el formato binario, REG_DWORD representa el formato hexadecimal y el predeterminado es el formato de cadena. Ejecute el código anterior, Windows creará automáticamente dos fuentes de datos. Es muy simple, extiéndalo, como configurar el programa para que se ejecute automáticamente, y cambie la configuración relacionada con IE, haga doble clic en la letra de la unidad para ejecutar su programa preestablecido, etc. Estas operaciones relacionadas se pueden implementar automáticamente cuando otros ejecutan su programa. comportamiento muy inseguro. También debe usarse con moderación.