Avatar billede internalerror Nybegynder
24. september 2008 - 05:21 Der er 4 kommentarer og
1 løsning

Skjul password

Jeg bruger følgende kode til at hente noget data fra en MSSQL server og sætte det ind i et ark.

__________________________________________________

Sub X()
  Dim lSql As String
  Dim lConn As ADODB.Connection
  Dim lRs As ADODB.Recordset
  Dim lSource As String
  Dim lUser As String
  Dim lPassword As String

  '***************************************
  ' Hvordan skjuler man følgende?
  lSource = "'MinDataBase'"
  lUser = "'BrugerNavn'"
  lPassword = "'KodeOrd'"
  '***************************************

  lSql = "Select * From dbo.tblMinTabel"
  Set lConn = New ADODB.Connection
  lConn.ConnectionString = "Data Source=" & lSource & ";" & _
                          "User ID=" & lUser & ";" & _
                          "Password=" & lPassword & ";"
  lConn.Open
  Set lRs = New ADODB.Recordset
  lRs.Open lSql, lConn, adOpenStatic, adLockReadOnly
  Sheet1.Range("B2").CopyFromRecordset lRs
  lConn.Close
  Set lConn = Nothing
  Set lRs = Nothing
End Sub

_______________________________________



Hvordan skjuler man source, user og password i koden, så brugeren ikke umiddelbart kan få det at se?
Hvis man som her skriver det direkte i koden, er det jo ikke det store problem og finde det frem.
Avatar billede kabbak Professor
24. september 2008 - 12:34 #1
Beskyt modulet med kode, så kan men ikke komme ind og se koderne
Avatar billede internalerror Nybegynder
24. september 2008 - 15:09 #2
Hvordan gør man det?
Avatar billede kabbak Professor
24. september 2008 - 16:03 #3
Højreklik på Modules, i vinduet til venstre, vælg VBAproject properties, Fanen Protection
Avatar billede internalerror Nybegynder
24. september 2008 - 16:22 #4
Det var lige det jeg søgte.
Tak for hjælpen.
Avatar billede kabbak Professor
24. september 2008 - 16:31 #5
et svar ;-))
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester