filmdatenbank - unterschiedlichste fragen... :: Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office

Einloggen, um private Nachrichten zu lesen

Downloads

filmdatenbank - unterschiedlichste fragen...

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Access Hilfe

Gehe zu Seite Zurück 1, 2, 3

Autor

Nachricht

freaky
Moderator

Anmeldedatum: 11.04.2006
Beiträge: 751
Wohnort: im Norden

Verfasst am: 17.07.2006, 22:35

Hi,

Sorry - das habe ich fast vergessen....

Also hier mal erstmal den Aufbau für den Code. Du hast eine Tabelle, die einen Schlüssel für den Regisseur udn den Film enthält. Diese Tabelle heißt bei mit tbl_Film_Regie. Dazu erstelel ich eine Abfrage "Abfr_Film_Regie, die eine Verknüpfung zu den beiden Tabellen "Regie" und "Film" hat.

Dann brauchst Du nur noch diese Funktion:

Code:

Function Film_Regie(Filmnr As Long) As String

Dim db As DAO.Database
Dim rs As DAO.Recordset
Dim strSQL As String
Dim strWert As String

Set db = CurrentDb
strSQL = "SELECT * FROM [Abfr_Film_Regie] WHERE [Film]=" & Filmnr
Set rs = db.OpenRecordset(strSQL)

If Not rs.EOF And Not rs.BOF Then
rs.MoveFirst
While Not rs.EOF
strWert = strWert & rs("Regisseur").Value & "; "
rs.MoveNext
Wend
Film_Regie = Left(strWert, (Len(strWert) - 2))
End If

Set rs = Nothing
Set db = Nothing

End Function

Der Feldname für den Naqmen des Regisseurs in der Tabelle "Regie" ist hier "Regisseur". Dass musst Du alles ggf. anpassen.

Der Aufruf geschieht eigentlich jetzt nur noch denkbar einfach:

Me.DeinTextfeld.Value = Film_Regie(Filmnummer)

In der Variablen "Filmnummer" steht die Filmnummer, zu dem Du die Regisseure suchst.
Das Ergebnis ist ein String, der dann etwas so aussieht:

Jean-Pierre Jeunet, Marc Caro

Du kannst die Funktion in ein extra Wodul packen - aber auch in den Code des Formulares...

_________________
Gruß
freaky
----------------------------------------------------------------
Windows 2000, Windows XP
Office 97, Office 2000, Office 2003 und Office 2007
_____________________________________________
Feedback nicht vergessen....
---------------------------------------------------------------

vonson
Newbie
Newbie

Anmeldedatum: 08.06.2006
Beiträge: 29

Verfasst am: 19.07.2006, 19:40

wow, danke. das sieht kompliziert aus, muß ich mir erstmal in ruhe ansehen, sobald ich zeit habe. melde mich dann später mit ergebnissen oder fragen wieder... ;)

vonson
Newbie
Newbie

Anmeldedatum: 08.06.2006
Beiträge: 29

Verfasst am: 19.03.2007, 05:04

hi.
lang ist's her. ich war mit dem ganzen komplex etwas überfordert und hab letztendlich meine datenbank monatelang nicht mehr angerührt. jetzt würd ich's gern wieder versuchen - aber ich muß gestehen, daß ich absolut überhaupt nicht weiß, wie ich mit dem code umgehen muß...

Office-Hilfe.com - Wir lösen Ihre Probleme mit Microsoft Office Foren-Übersicht » Microsoft Access Hilfe

Gehe zu Seite Zurück 1, 2, 3

Thema		Autor	Forum	Antworten	Verfasst am
Ähnliche Beiträge
	Habe fragen zu Access 2007	Amsel0_0	Microsoft Access Hilfe	5	08.04.2008, 14:45
	Excel Fragen, Bereichsnamen erweitern...	Squooshie	Microsoft Excel Hilfe	4	08.02.2008, 09:34
	Fragen zu Excel 2007, wer kann mir bi...	bassethound	Microsoft Excel Hilfe	5	15.11.2007, 18:00
	3 Fragen	Onkel22	Microsoft Excel Hilfe	4	14.11.2007, 17:49
	2 Fragen: Textformatierung in einer F...	Virginie	Microsoft Excel Hilfe	10	07.11.2007, 15:14

Gehe zu:

Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
Du kannst Dateien in diesem Forum posten
Du kannst Dateien in diesem Forum herunterladen

Powered by phpBB © 2001, 2002 phpBB Group :: FI Theme :: Alle Zeiten sind GMT + 1 Stunde
Deutsche Übersetzung von phpBB.de