Frohe Weihnachten,
Der neue Rechner hat Windows 7 Homeedition
Mit der frsch installierten ACC 2003 und unter XP einwandfrei laufender DB bekomme ich nun eine falschen Wert bei der Funktion
X = DIR("Verzeichnis")
Als Antwort bekomme ich normalerweise einen Leerstring, wenn das Verzeichnis leer ist bzw X enthält den ersten gefundenen Dateinamen aus diesem Verzeichnis.
Unter Windows 7 bekomme ich nun einen Leerstring obwohl es Dateien in dem Verzeichnis gibt.
Gibt es dafür eine Erklärug?
Grüße aus Berlin
Peter
Hallo,
läuft Windows 7 unter 64 Bit?
Hast du deinen Code mal Kompelliert?
Datenbank Komprimiert/Repariert?
Verweise alle vorhanden?
Andreas
Hallo Andreas,
Windows 7 läuft unter 64bit und die Verweise sind identisch mit denen auf dem XP-System
jedoch ohne Erfolg
Gruß
Peter
Hallo,
hast du SP3 für das Office installiert? Und ggf aktuelle Hotfixes?
Andreas
Hi, ist Verzeichnis ein Netzlaufwerk?
Hallo,
...und ist "Verzeichnis" mit einem Backslash \ abgeschlossen?
Habe das eben mal versucht - ohne Backslash = "", mit Backslash erhalte ich den ersten gefundenen Dateinamen
Das SP 2 ist installiert und der Pfadname lautet:
C:\Verzeichnis\Unterverzeichnis\*
Hi,
für Office 2003 gibt es bereits das SP3, nicht 2
Hallo,
Was pssiert, wenn du den Stern im Pfad wegnimmst?
Dim Verzeichnis as String
Dim X as String
Verzeichnis = "C:\Verzeichnis\Unterverzeichnis\"
X = Dir(Verzeichnis)
...zeigt bei mir den Namen der ersten gefundenen Datei in 'Verzeichnis' an
Win 7 64 Bit Ultimate, ACC2007 / Win 7 64 Bit Ultimate, ACC2010 als VM, Win 7 64 Bit Ultimate, ACC2003 SP1 / SP2 / SP3
Keine Probleme mit oben angebenen Kombinationen, es wird jeweils der Name der ersten gefundenen Datei ausgelesen.
Ich habe noch einmal alles probiert, aber ohne Erfolg
Gibt es noch einen Hinweis?
Gruß
Peter
Guten Morgen,
ich fürchte, ich kann dir da nicht weiterhelfen - höchstens noch mit einem Verzweiflungshinweis :-\
Windows 7 Home ... die Rechtevergabe unter dieser Edition kenn' ich zu wenig
Benutzerkontensteuerung, versuch mal den Regler ganz nach unten, dann Neustart.
Überprüfen der Zugriffsrechte auf den benötigten Ordner
Definiere versuchsweise den Speicherort als 'vertrauenswürdigen Speicherort'
Kannst du Dateien in deinen Benutzerverzeichnissen auflisten?
Dann bin ich mit meinem Latein am Ende
Ich werde weiter experimentieren.
Danke auf jeden Fall für Eure Hilfe
Gruß und guten Rutsch
Peter
Ich haben inzwischen den Fehler in meinem VBA-Code entdeckt und nunfunktioniert es einwandfrei.
Wie der Fehler jedoch dahingekommen ist, denn früher ist er nicht aufgetreten das wissen die Götter.
Nochmals Danke für die Unterstützung
Gruß
Peter
Hallo,
ZitatIch haben inzwischen den Fehler in meinem VBA-Code entdeckt und nunfunktioniert es einwandfrei.
Den Fehler solltest Du hier natürlich auch beschreiben. Die Lösungen (auch die selbst gefundenen) gehören auch ins Forum.
Ich habe in der Zeile
strPath = "C:\Verzeichnis"
If Dir(strPath & "\") = "" Then ....
einen Stern gehbat
If Dir(strPath & "\*") = "" Then .....
und das hat den Fehler verursacht
Eigenartigerweise läuft das Programm unter Windows XP auch mit diesem Stern
Gruß
Peter
Hallo,
würdest du dann bitte diesen Thread in deinem ERSTEN Beitrag auf 'gelöst' setzen - DANKE