VBA Public const-ba lekérdezés eredményének beírása/globális felhasználása

VBA Public const-ba lekérdezés eredményének beírása/globális felhasználása
2020-10-30T10:38:13+01:00
2020-10-30T16:10:22+01:00
2022-10-15T21:25:21+02:00
analgetika
Sziasztok,

VBA-ban hogyan lehet globális constans változóba sql select lekérdezés eredményét berakni, hogy utána az egész projectben bárhol tudjam használni a változó eredményét?

Public Const Servername As String = "test" Public Const DatabaseName As String = "DB_test" Public Const ConnectionString As String = "Provider=SQLOLEDB;Server=" & Servername & ";Database=" & DatabaseName & ";Trusted_Connection=yes;" Public Const S_ID As String = "test" Dim cmdCommand As New ADODB.Command Dim cn As New ADODB.Connection Dim rst As New ADODB.Recordset Dim StrQuery As String cn.Open ConnectionString cn.CommandTimeout = 900 StrQuery = "select password from t_tabla where user_name='test' and azon='" & S_ID & "' " rst.Open StrQuery, cn Public Const PWD As String =rst.Fields("password").Value
Ez így nem működik, de vmi ilyesmit szeretnék, hogy után csak a PWD változót/tartalmát tudjam használni bárhol a projectben, és ne kelljen mindnehol lekérdezni a password-ot.
Mutasd a teljes hozzászólást!
Szia!

A munkalap tetejére, az első Sub előtt Public kulcsszóval deklarálod a változót.
Mutasd a teljes hozzászólást!

Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd