November 19, 2008 02:35am pst

1. capricorn1 1,164,378
2. LSMCons... 643,742
3. boag2000 584,207
4. DatabaseMX 439,605
5. peter57r 402,190
6. harfang 277,504
7. matthews... 220,454
8. jimhorn 192,522
9. TextReport 132,746
10. MikeToole 120,513
11. omgang 115,275
12. frankytee 99,014
13. koutny 94,835
14. GRayL 90,855
15. angelIII 90,320
16. irudyk 89,074
17. LennyGray 81,272
18. mbizup 79,933
19. Rick_Ric... 79,617
20. hnasr 76,855
21. cactus_d... 71,848
22. JDettman 69,055
23. eghtebas 68,487
24. jmoss111 68,371
25. rorya 64,932

1. capricorn1 1,785,223
2. LSMCons... 875,861
3. DatabaseMX 742,330
4. peter57r 639,699
5. boag2000 624,119
6. harfang 459,052
7. jimhorn 388,512
8. matthews... 369,718
9. jefftwilley 353,737
10. mbizup 275,650
11. frankytee 234,267
12. MikeToole 225,563
13. stevbe 222,014
14. omgang 187,510
15. GRayL 176,661
16. rockiroads 166,783
17. LPurvis 144,870
18. JDettman 138,915
19. angelIII 133,378
20. TextReport 133,246
21. ragoran 112,130
22. koutny 109,860
23. dqmq 106,796
24. Rick_Ric... 103,217
25. eghtebas 96,062

07.18.2008 at 03:27PM PDT, ID: 23578425

	[x] Attachment Details

[x]

The Solution Rating System

With so many solutions, how can you tell which solutions are most likely to help you and which ones are not? To provide you with a tool to use, we rate our solutions based on various elements that most accurately determine if a solution is a quality solution. To explain what factors affect the solution rating, here are the elements we take into consideration when formulating our solution rating.

The Grade of the Solution
The Zone Rank of the Expert Providing the Solution
The Number of Author and Expert Comments
The Number of Experts Contributing
The Feedback of the Community

Your Input Matters
Because of the way the system is set up, the most important variable in this equation is you. As a member of Experts Exchange, you are able to cast your vote on the quality of the solutions in regard to how complete, accurate, helpful and easy to understand each solution is. When you provide your feedback, each rating is adjusted accordingly. So, if you see a solution that has a poor rating that you think is a good solution, let us know by rating it. As you do, the rating will be adjusted and will become more accurate for other members of our site.

If you have any suggestions that you would like to make for our rating system, please ask a question in the Suggestions Zone of Community Support.

Thank you!

8.2

Creating an ODBC connection via VBA utilizing a generic username and password

Asked by swedishtongue in Access Coding/Macros, Microsoft Access Database

Tags: miscrosoft, Access, 2003, shared application

i have created the following code to automatically set up an ODBC connection in my access database. this code works great if i use the trusted connection option but when i try and give it a generic user name and password it fails. Anyone know what i am doing wrong?

PS i have manually set up the user name and password and they work just fineStart Free Trial

         
           
             1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:

           
           
             Option Compare Database
 
Option Explicit
 
'Const ODBC_ADD_SYS_DSN = 1      'Add a user data source
Const ODBC_CONFIG_SYS_DSN = 2    'Configure (edit) data source
Const ODBC_REMOVE_SYS_DSN = 3    'Remove data source
Const ODBC_ADD_SYS_DSN = 4       'Add a system data source
 
Private Declare Function SQLConfigDataSource Lib "ODBCCP32.DLL" (ByVal _
   hwndParent As Long, ByVal fRequest As Long, ByVal _
   lpszDriver As String, ByVal lpszAttributes As String) As Long
                    
 
Function Build_SystemDSN()
  
    Dim Driver As String
    Dim Ret As Long
    Dim Attributes As String
 
    Driver = "SQL Server"
    'attributes are the connection information
    
    Attributes = "server=ANSRLTR" & Chr(0)
    Attributes = Attributes & "DSN=DSN_Temp" & Chr(0)
    Attributes = Attributes & "Database=ANSRLTR_Prod" & Chr(0)
    'use this line if you want to use the users name and password
    'Attributes = Attributes & "Trusted_Connection=Yes" & Chr(0)
    'use this line if you are adding a username and password
    Attributes = Attributes & "Uid=Temp;" & Chr(0) & "Pwd=TempID" & Ch(0)
 
      Ret = SQLConfigDataSource(0, ODBC_ADD_SYS_DSN, Driver, Attributes)
   
   
   'ret is equal to 1 on success and 0 if there is an error
   If Ret <> 1 Then
       MsgBox "DSN Creation Failed"
   End If
 
 
End Function

           
         

Keywords: Creating an ODBC connection via VBA …

	Title
1	ODBC Connect to DSN with Username …
2	I need a bat that can create an ODBC f…
3	odbc link
4	Automate creation of an ODBC-Syste…
5	Linking Microsoft Access to Oracle OD…
6	What are the options for seeing what k…

Loading Advertisement...

20081112-EE-VQP-43 / EE_QW_2_20070628

Creating an ODBC connection via VBA utilizing a generic username and password

Asked by swedishtongue in Access Coding/Macros, Microsoft Access Database

Tags: miscrosoft, Access, 2003, shared application

About this solution