PDA

Vollständige Version anzeigen : Format Problem


Steffen Wöhner
26.09.2003, 09:52
Ich öffne meine Datenbank und es erscheint "Fehler beim Kompilieren". Die Datenbank ist im August noch ohne Fehler gelaufen. Anbei der Code der reklamiert wird. Wo liegt hier der Fehler???
Markiert wird der Fehler Format!!!



Private Sub Form_Current()


Me!Dateiname = "c:\Diaverwaltung\bilder\" & Format([alte Ordnungsnummer I], "0") & Format([alte Ordnungsnummer II], "00") & Format([Dianummer], "00000") & "_jpg.jpg"
If Dir(Dateiname) = "" Then
Me!GBild.Picture = "c:\Diaverwaltung\bilder\leer_jpg.jpg"
Else
Me!GBild.Picture = Me!Dateiname
End If

End Sub

Hideloop
26.09.2003, 10:04
Hi,

so blöd es klingt. Aber hast mal einen repair DB gemacht ?
Hatte unter A97 schon die merwürdigsten Phänomene die
dann nach dem repair verschwunden sind.

Loop

Steffen Wöhner
26.09.2003, 10:34
Hat leider nichts gebracht.

Habe jetzt mal die ganze Formatgeschichte weggelassen und folgendes eingesetzt:

Me!Dateiname = "c:\Diaverwaltung\bilder\bildername.jpg"

statt

Me!Dateiname = "c:\Diaverwaltung\bilder\" & Format([alte Ordnungsnummer I], "0") & Format([alte Ordnungsnummer II], "00") & Format([Dianummer], "00000") & "_jpg.jpg"


und dann zeigt er mir das Bild "Bildername.jpg" an.

Ist vielleicht der Formatbefehl falsch ???

Steffen Wöhner
26.09.2003, 11:02
Habe nun folgenden Code ausprobiert:

Me!Dateiname = "c:\Diaverwaltung\bilder\" & [alte Ordnungsnummer I] & [alte Ordnungsnummer II] & [Dianummer] & "_jpg.jpg"

Dieser funktioniert auch. Wenn ich aber jetzt den Formatbefehl eingebe habe ich schon ein Problem.

Hideloop
26.09.2003, 11:35
Wenn hier : Format([Dianummer], "00000") Werte mit weniger als 5 Stellen vorkommen mußt Du statt 0 eine # nehmen.

Vielleicht das ?

Loop

Paul.Ostermeier
26.09.2003, 11:38
nachdem Deine Datenbank ja bis August mit dem Code funktioniert hat, würde ich vermuten, dass Deine Installation einen "Schlag" hat, Du könntest

1. die Verweise überprüfen
2. das Servicerelase evtl. updaten
3 . Access neu installieren

Steffen Wöhner
26.09.2003, 12:19
SUUUPPPPEEEERRR !

Habe Access deinstalliert und nochmals neu installiert. Jetzt geht´s!!!!

Danke