Daten aus Access DB lesen

[woulverine]

Guten Tag

Folgende Ausgangslage:
(Die Verbindung zur DB wird in einer anderen Funktion erstellt und funktioniert)

Public Function getDBsettings()
    Dim rsNetworkAddress As ADODB.Recordset
    Dim strSQLStatement As String
    
    Screen.MousePointer = vbHourglass
    Set rsNetworkAddress = New ADODB.Recordset
    
'Get information from Network_Address table
    strSQLStatement = "SELECT " & SizeCommon & " FROM IEC101_Application"
    rsNetworkAddress.Open strSQLStatement, cnCOM581DB, adOpenDynamic, adLockPessimistic
    rsNetworkAddress.MoveFirst
    
'set Parameters
    txtSizeCommon.text = rsNetworkAddress!IEC101_Size_of_Common_Address_of_ASDU
    
    rsNetworkAddress.Close
    Screen.MousePointer = vbDefault
End Function

Das klappt alles wunderbar. Nun möchte ich aber folgendes ändern:

txtSizeCommon.text = rsNetworkAddress!IEC101_Size_of_Common_Address_of_ASDU

in

txtSizeCommon.text = rsNetworkAddress!SizeCommon

Doch das funktioniert nicht. Es kommt eine Runtime error 3265

Ach ja, in der Variable SizeCommon steht: IEC101_Size_of_Common_Address_of_ASDU und ich lese diese au seinem INI-file aus.

Kann mir jemand weiterhelfen?

Grüsse
Woulv

 

[Alex F.]

erstens dein Variablen name IEC101_Size_of_Common_Address_of_ASDU ist mit 37 Zeichen schon extrem lang aber mach es so

txtSizeCommon.text = rsNetworkAddress.Fields(SizeCommon).value

Dann sollte das klappen.

Grüsse bb

 

[woulverine]

Woooa, vielen Dank! Es klappt wunderbar!
Danke, danke und nochmals danke

Grüsse
Woulv