OpenOffice.info

Sehr gut...vielen Dank...

sSQL = "select ""Anrede"", ""Vorname kurz"", ""Nachname kurz"", ""Straße"", ""Postleitzahl"", ""Ort"" from ""Kundendaten"" where ""Personennummer"" like '" & A.Value & "'"

sSQL = "select ""Anrede"", ""Vorname kurz"", ""Nachname kurz"", ""Straße"", ""Postleitzahl"", ""Ort"" from ""Kundendaten"" where ""Personennummer"" = " & A.Value

Aloha

[quote="Gast"]"A" habe ich davor als Object Deklariert und mit: A = Eingaben.Model.getByName("KdNr") das entsprechende Feld zugewiesen.[/quote]

Dann sieht das so aus

[code]sSQL = "select ""Anrede"", ""Vorname kurz"", ""Nachname kurz"", ""Straße"", ""Postleitzahl"", ""Ort"" from ""Kundendaten"" where ""Personennummer"" like '" & A.Value & "'"[/code]

Je nachdem, was für ein Feld Du benutzt (Numerisches oder Textfeld), kann es statt A.Value auch A.Text lauten.

Wenn die Personennummer immer eine Zahl ist, dann kannst Du das Ganze auch so
[code]sSQL = "select ""Anrede"", ""Vorname kurz"", ""Nachname kurz"", ""Straße"", ""Postleitzahl"", ""Ort"" from ""Kundendaten"" where ""Personennummer"" = " & A.Value[/code]
machen.

Sehr gut,

Vielen Dank...funktioniert bestens.

Grüße Stefan

Dim oDialog1

Sub Dialog_starten()
	DialogLibraries.LoadLibrary("Standard") 
	oForm = DialogLibraries.Standard.Eingaben
	oDialog1 = CreateUnoDialog( oForm )
	oDialog1.execute
End Sub

Sub auslesen()
	Msgbox oDialog1.Model.getByName("Kundennummer").Value
End Sub

Beispielsweise:

[code]Dim oDialog1

Sub Dialog_starten()
DialogLibraries.LoadLibrary("Standard")
oForm = DialogLibraries.Standard.Eingaben
oDialog1 = CreateUnoDialog( oForm )
oDialog1.execute
End Sub

Sub auslesen()
Msgbox oDialog1.Model.getByName("Kundennummer").Value
End Sub[/code]


Gruß
Stephan

Hallo liebe User,

ich versuche schon seit einiger Zeit verzweifelt einen Code für folgendes Problem zu schreiben.
Ich habe ein Nummernfeld in einem Dialog. Das Dialogfeld heißt "Kundennummer" und der Dialog "Eingaben"
Um zu testen ob das Auslesen funktioniert, wollte ich die im Dialogfeld eingegebene Kundennummer zunächst in einer Message Box anzeigen lassen.
Leider blieben meine Versuche erfolglos.

Für Eure Hilfe bedanke ich mich schon mal ganz herzlich.

Falls das Thema im Forum schon beschrieben wurde entschuldige ich mich, jedoch hab ich trotz langer Suche nichts genaueres dazu gefunden.

Grüße Stefan