OpenOffice.info

[quote="Ralle67"]Ich muss mir wohl doch mal ein StarBasic-Buch zulegen ;-)[/quote]
Nö, denke ich nicht.

Wenn Du schon so weit, wie beschrieben, gekommen bist helfen Dir Bücher nicht (mehr) weiter.

Bedenke: die Probleme, die nun bei Deinen Versuchen hochkommen, und die Fragestellungen "wie löse ich das?", haben andere auch schon gehabt.

Diese fragten dann hier (oder sonstwo im Netz) und erhielten auf konkrete Fragen (meist) auch konkrete Antworten.

5¢ von mir.

SQL = "SELECT * FROM ""Medien"" WHERE """ & sfeld & """ LIKE '%" & stxt & "%'" 

Hi Barlee,

so klappt es nun:

[code]SQL = "SELECT * FROM ""Medien"" WHERE """ & sfeld & """ LIKE '%" & stxt & "%'" [/code]

Die doppelten Anführungszeichen waren der Trick. Die Spalte 'sfeld' musste auch noch in doppelte " gesetzt werden.
Nun kann ich weitermachen...

Ich muss mir wohl doch mal ein StarBasic-Buch zulegen ;-)

Vielen Dank für dein Hilfe!

Gruß
Ralf

 SQL = "SELECT * FROM Tab_Personen WHERE " & sfeld & " LIKE '%" & stxt & "%'"

Hallo Ralf,

hast Du schon eine Lösung?
Ändert sich etwas, wenn Du in der Anweisung
[code] SQL = "SELECT * FROM Tab_Personen WHERE " & sfeld & " LIKE '%" & stxt & "%'"[/code]
die Tabelle in doppelte Anführungszeichen (""Tab_Personen"") setzt?

Gruß Barlee

	SQL = "SELECT * FROM "Medien" WHERE " & sfeld & " LIKE '%" & stxt & "%'" 

	SQL = "SELECT * FROM 'Medien' WHERE " & sfeld & " LIKE '%" & stxt & "%'" 

[quote="Barlee"]Hallo Ralle,

setze einmal den Tabellennamen in Anführungszeichen. Wie siehts dann aus?

Gruß Barlee[/quote]

Hmmm, wenn ich folgendes mache,

[code] SQL = "SELECT * FROM "Medien" WHERE " & sfeld & " LIKE '%" & stxt & "%'" [/code]

dann kommt "Basic-Syntaxfeher. Unerwartetes Symbol: Medien.". Sowas hatte ich aber auch erwartet bei Anführungszeichen in Anführungszeichen. Ich habe auch versucht die inneren " durch \" zu tarnen, das brachte aber auch nix.

[code] SQL = "SELECT * FROM 'Medien' WHERE " & sfeld & " LIKE '%" & stxt & "%'" [/code]

Bei diesem Versuch kommt "unexpected Token: Medien...".

Laut diverser Code-Beispiele sollte es eigentlich ohne Anführungszeichen klappen. Allerdings muss man bei einer SQL-Abfrage von Hand schon welche setzen... Verstehe ich nicht...

Gruß
Ralf

Hallo Ralle,

setze einmal den Tabellennamen in Anführungszeichen. Wie siehts dann aus?

Gruß Barlee

REM suche nach Titel
sub Suche_titel
	Dim sText as String
	Dim sFeld as String
	sText = thisComponent.drawpage.forms.getByName("Sucheingabe").getByName("sf1").text
	sFeld = "Titel"
	sql_sucheMedien( sText, sFeld)
end sub

REM  Suchliste wird aufbereitet
sub sql_sucheMedien(stxt, sfeld)
	SQL = "SELECT * FROM Medien WHERE " & sfeld & " LIKE '%" & stxt & "%'" 
	
	DatabaseContext = createUnoService("com.sun.star.sdb.DatabaseContext")
	DataSource = DatabaseContext.getByName("Medien Fröbelschule")
	Connection = DataSource.GetConnection("","")
	Statement = Connection.createStatement()
	ResultSet = Statement.executeQuery(SQL)

Tja, das klappt wohl nicht...
Der folgende Code erzeugt in der letzten Zeile immer eine Exeption: Table not found in statement [SELECT * from Medien].
Die Tabelle heißt aber Medien!

Was mache ich falsch???

Ansonsten klappt alles... Formular wird ausgelesen, SQL-query-string sieht eigentlich auch gut aus... Die Datenquelle habe ich auch eingetragen...

[code]REM suche nach Titel
sub Suche_titel
Dim sText as String
Dim sFeld as String
sText = thisComponent.drawpage.forms.getByName("Sucheingabe").getByName("sf1").text
sFeld = "Titel"
sql_sucheMedien( sText, sFeld)
end sub

REM Suchliste wird aufbereitet
sub sql_sucheMedien(stxt, sfeld)
SQL = "SELECT * FROM Medien WHERE " & sfeld & " LIKE '%" & stxt & "%'"

DatabaseContext = createUnoService("com.sun.star.sdb.DatabaseContext")
DataSource = DatabaseContext.getByName("Medien Fröbelschule")
Connection = DataSource.GetConnection("","")
Statement = Connection.createStatement()
ResultSet = Statement.executeQuery(SQL)[/code]

Hallo Ralle,

ja, da bleibt wohl nur ein Makro.
Dieses muss:
1- das Textfeld auslesen
folgendes könnte helfen:
http://de.openoffice.info/viewtopic.php?f=8&t=12709&p=63859&hilit=formularfeld+auslesen#p63859

2- eine Verbindung zur DB aufbauen und die Abfrage absetzen. Als Suchkriterium muss der ausgelesene Wert genommen werden.
Hier ist der Weg beschrieben, auf Datenbanken mittels BASIC zuzugreifen und Abfragen zu starten:
http://www.dannenhoefer.de/faqstarbasic/WiekannmanaufDatenbankenzugreifen..html

Vielleicht kommst Du damit weiter??
Gruß Barlee

Hallo Ralle67,

[quote]aber da ist der Suchbegriff (z.B. WIE '*suchtext*') ja fest und nicht variabel.
[/quote]
Mit einer Parameterabfrage könntest Du den Suchbegriff immer neu definieren.
Siehe u.a.
http://de.openoffice.info/viewtopic.php?f=8&t=13206&p=52917&hilit=suche+parameterabfrage#p52917

Gruß Barlee