Office: (Office 2003) maximale String Länge

Ich habe zwei Module, die an Hand von Formulareingaben ein SQL zusammenbauen. Beide SQL Abfragen können länger als 256 Zeichen werden.

Bie Modul1 ist das kein Problem, egal wie lang die Abfrage wird. Bei Modul2 wird immer nach 256 Zeichen abgeschnitten.

Wie kann ich beeinflussen, wie lange ein String in VBA sein darf? In den Doks lese ich mal 256 mal 65536 Zeichen.

Besten Dank für eure Hilfe
Anton

:)

 

Hallo Anton,

wie hast du die Strings denn deklariert? Und wie wird der SQL-String erstellt?

Zeig doch mal einen Code-Ausschnitt...

 

Dieser Code hier funktioniert perfekt, auch wenn es wesentlic mehr als 256 Zeichen werden.

HTML:

Dim sqlStr As String
Dim sqlBase As String
Dim sqlJoin As String
Dim sqlSet As String
Dim sqlWhere As String
Dim stmt As String

.....

sqlBase = "(([Link ProjektSelektiert] RIGHT JOIN Projekt ON [Link ProjektSelektiert].AbNr = Projekt.AbNr) LEFT JOIN Anlage ON Projekt.AbNr = Anlage.ABNr) "
sqlJoin = ""
sqlSet = "SET [Link ProjektSelektiert].AbNr = [Projekt].[AbNr], [Link ProjektSelektiert].Selektiert = Yes "
sqlWhere = ""

With frm
'  ABNr (VK-Auftrag)
If Not IsNull(.[AuftragsbestNr]) Then
sqlWhere = conjugate(sqlWhere, "(Anlage.AbNr) = " & .[AuftragsbestNr], " AND ")
End If

'  Projektnummer
If Not IsNull(.[Projektnummer]) Then
sqlWhere = conjugate(sqlWhere, "(Projekt.SNummer) = " & .[Projektnummer], " AND ")
End If

..... ca. 20 Tests, die sqlWhere erweitern


sqlStr = "UPDATE DISTINCTROW " & sqlBase & sqlJoin & sqlSet
sqlStr = conjugate(sqlStr, sqlWhere, " WHERE ")
sqlStr = sqlStr & ";"

Debug.Print sqlStr

DoCmd.RunSQL sqlStr

Dieser hier schneidt nach 256 Zeichen ab:
Code:

von Projektbezeichnung landet nur noch das halbe Wort im String.

Vielen Dank für eure Unterstützung!
Anton

 

Hi,

in meinen Hirn wandern irgendwie die 65K Zeichen rum, stelle mal bitte deinen Zusammenbau um:

Code:

Denn da geistert mir im Kopf herum, dass maximal 6 Zeilenumbrüche erlaubt sind.

 

Das kann nicht das Problem sein. Bis zur vorletzten Zeile funktioniert alles richtig.

Ich habe die Code-Zeilen schon auf ein halbes Dutzend verschiedene Arten geschrieben, Strings verkettet, mit Funktionsaurufen usw. leider alles ohne Erfolg. Nach 256 Zeichen ist Schluss.

Die Frage bleibt: Weshalb funktioniert der Code oben auch mit mehreren hudert Zeichen und der unten stur nur bis 256 Zeichen?

 

Was wird eigentlich abgeschnitten - der SQL-String oder das daraus ermittelte Ergebnis eines Feldes?
Wenn es ein FEld ist: welchen Datentyp hat das Zielfeld?

 

Das mit den Zeilenumbrüchen sollte aber zu einem Fehler führen...

 

Ich glaube ich habe das Problem gefunden. Die Ausgabe im "Lokal" Fenster im VBA ist Schrott und schneidet die Strings ab. Das heist zum Überprüfen von langen Strings sollte Debug.Print verwendet werden.

Besten Dank fürs Mitdenken!
Anton