none
Script para establecer una conexion en ODBC RRS feed

  • Pregunta

  • Buenas tengo un pequeño problema tengo un script para crear un DSN. el problema esta que cuando se ejecuta el script al iniciar sesion este me crea la carpeta en el regedit con todo su registro pero cuando voy a odbc.exe o odbcad32.exe para verificar en la opcion dsn que se establecio la conexion esta no aparece quisiera que me ayudaran este es el script que tengo.

    Const HKEY_LOCAL_MACHINE = &H80000002

    strComputer = "."
     
    Set objReg=GetObject("winmgmts:{impersonationLevel=impersonate}!\\" & _
        strComputer & "\root\default:StdRegProv")
     
    strKeyPath = "SOFTWARE\ODBC\ODBC.INI\ODBC Data Sources"
    strValueName = "SISTEMAS"
    strValue = "SQL Server"
    objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
     
    strKeyPath = "SOFTWARE\ODBC\ODBC.INI\SISTEMAS"

    objReg.CreateKey HKEY_LOCAL_MACHINE,strKeyPath

    strKeyPath = "SOFTWARE\ODBC\ODBC.INI\SISTEMAS"

    strValueName = "Database"
    strValue = "SISTEMAS"
    objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
     
    strValueName = "Driver"
    strValue = "C:\WINDOWS\System32\SQLSRV32.dll"
    objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

    strValueName = "Server"
    strValue = "SRV-DATOS"
    objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

    strValueName = "Trusted_Connection"
    strValue = "Yes"
    objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

    strValueName = "AnsiNPW"
    strValue = "No"
    objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

    strValueName = "Description"
    strValue = "SAKF"
    objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

    strValueName = "LastUser"
    strValue = "pruebati"
    objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

    strValueName = "QuotedId"
    strValue = "No"
    objReg.SetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue

    estas son imagenes de lo que me aparece y lo que no aparece

    http://i43.tinypic.com/2v2xe6r.png

    http://i42.tinypic.com/1g6h6h.png

    jueves, 16 de mayo de 2013 14:48

Respuestas