title image


Smiley So klappt es bei mir
Ich habe jetzt extra mal eine Tabelle mit Volltextsuche angelegt. Die Prozedur von Taxcasher muss um einfache Anführungszeichen erweitert werden:





Private Sub cmdfinden2_Click()

On Error GoTo Err_cmdfinden2_Click





If Not IsNull(Me!txtStichwort) Then

sql = "SELECT btBerichtsID As ID, btSignatur As Signatur, btBerichtstitel_Akt As Berichtstitel, btSachinhalt As Sachinhalt FROM tblBericht WHERE FREETEXT (btBildinhalt, '" & Me!txtStichwort & "')"

Me!lstDatumErgebnis.RowSource = sql

'Me!lstDatumErgebnis.Requery

Else

MsgBox " Bitte Stichwort eingeben!", vbExclamation, "Stichwortsuche"

Me.txtStichwort.SetFocus

End If



Exit_cmdfinden2_Click:

Exit Sub



Err_cmdfinden2_Click:

MsgBox Err.Description

Resume Exit_cmdfinden2_Click



End Sub







MfG
Arne
FAQ | Grundlagen | DBWiki

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: