OpenOffice.info

Ich habe eine Liste von Datensätzen, in einer Combobox soll man alle in dem Attribut Name vorkommenden Namen zur Auswahl haben.
Wird dann einer Ausgewählt, so sollen nur die entsprechenden Datensätze ausgegeben werden.
Was verstehst du daran nicht ?

Hier mal noch, wie ich das ganze aufgebaut habe ...

hm, es is aber ne combobox und da gibts kein SelectedItems(0)

hm, bei mir funktioniert das nicht ... ich habe ein tabellenkontrollfeld in dem die ausgabe erfolgt und einee combobox in der die Namen nach denen gefiltert werden soll aufgelistet werden. wenn ich nun einen Namen auswähle, passiert nichts, es werden immernoch alle datensätze angezeigt.
mein basic ...

Hi,
ich würde gerne den Inhalt einer Abfrage in einem Tabellenkontrollfeld ausgeben. Die Abfrage sollte aber als Parameter den Wert einer Combobox verwenden. Wie kann man auf eine Combobox zugreifen ?

danke !

hm, eigentlich müsste es doch auch gehen, wenn ich eine abfrage erstelle, die alle datensätze ausgibt, die den wert in der combobox enthalten. nur wie kann man in einer abfrage auf die combobox zugreifen ? wie gebe ich dort an, dass als kriterium das cobobox-feld gewählt wird ?
und in dem ...

hm, ich habs jetzt ma abgeändert, auf ne combobox
Sub SelectCombobox
Dim oForm, oCombobox As Object
Dim LB_Item as integer
oForm = ThisComponent.drawpage.forms.getbyindex(0)
oCombobox = oForm.getByName("Combobox1")
LB_Item = oCombobox.Text
msgbox(LB_Item)
oform.absolute (LB_Item)
End Sub
die ...

Hey Jüren,

also die DB die in dem Thread mitgeliefert wird, die funktioniert schon, nur meine eigene net ;)
da sagt er mir, dass in der Zeile LB_Item = oListbox.SelectedItems die Objektvariable nicht belegt sei.

Sub SelectListbox
Dim oForm, oListbox As Object
Dim LB_Item as integer
oForm ...

naja, ich wage zu bezweifeln, dass das an meinem OS liegt, welches übrigens Debian GNU/Linux ist, 'testing' um genau zu sein.
OO ist 3.2.1.3 und es sind alles komponenten installiert, so wie auch java-unterstützung.

was ich nicht kapiere ... wie definiere ich, was in dem Tabellenkontrollfeld ...

hm, ok, danke !

ich hab mir mal das beispiel-file geholt und angeschaut, aber er bringt mir den folgenden fehler:
Eigenschaft oder Methode nicht gefunden: SelectedItems

das ist der code
Sub SelectListbox
Dim oForm, oListbox As Object
Dim LB_Item as integer
oForm = ThisComponent.drawpage.forms ...

Hi,

ich habe hier eine Datenbank die Benutzernamen und -daten enthält. Nun würde ich gerne ein Formular erstellen, in dem ich in einem Dropdown-Feld einen Benutzernamen auswählen kann, und dann werden darunter die Datensätze die es zu deisem Benutzer gibt angezeigt.

Aber ich krieg das nicht hin ...

ich glaub ich hab den fehler ... das makro wurde 2x ausgeführt, ich hatte es bei Aktion ausführen und bei Maustaste loslassen drin

naja, er fügt nen datensatz mit einem codierten string hinzu:

aber eben ohne benutzername, kene ahnung warum er das macht. den namen mit passwort fügt er aber auch passend hinzu.

fast ;)
unten muss es heissen
Else
Statement.executeUpdate("INSERT INTO t_users VALUES('"+oName+"','"+oPasswort+"');")
End If
spielt das da eigentlich eine Rolle ob man executeUpdate oder executeQuery verwendet ?

p.s.: du hättest mir nicht vorkauen müssen, bissel was sollt ich auch noch selbst ...

das funktioniert wunderbar, danke ! :)

noch nebenbei ... wie kann man püfen, ob eine abfrage mit ExecuteQuery einen Datensatz zurückgegeben hat ? dann baue ich nämlich noch ein, dass wenn ein usernamen vorhanden ist, dass dann gefragt wird, ob das passwort geändert werden soll oder nicht. der ...

ja, die heissen so, ich hab das formular neu angelegt ... nu bin ich weiter ... jetzt hängt er bei
ResultSet = Statement.executeQuery("INSERT INTO t_users VALUES('"+oInhalt+"','"+oPasswort+"');")
Cannot issue database manipulation statements with execute query.

edit: mit ExecuteUpdate gehts ...