Neuigkeiten:

Wenn ihr euch für eine gute Antwort bedanken möchtet, im entsprechenden Posting einfach den Knopf "sag Danke" drücken!

Mobiles Hauptmenü

Neueste Beiträge

#1
Access Programmierung / Re: FSO - Order/Pfad oder Date...
Letzter Beitrag von Jakomo - Mai 25, 2024, 10:50:17
Dankeschön mir Euren antworten, kann ich den Punkt "abhaken" !  :)
#2
Access Programmierung / Re: FSO - Order/Pfad oder Date...
Letzter Beitrag von Jakomo - Mai 25, 2024, 10:47:36
Ja, danke. So mach ich das derzeit auch, ist aber leider auch nicht fehlerfrei bzw. sauber.
 Ich dachte nur das (ohnehin recht umfangreiche) FSO hat da eine professionellere Lösung oder jemand hat damit einen schicken workaround.

Ich mache das derzeit wie folgt:
1. Ist ein Punkt drin?
  Falls ja vermutlich mit Dateiangabe
2.
'If fs.FileExists(filespec) Then
   
  '...und die Datei existiert!

'else
   ' ... Entweder (a) gibt es die Datei nicht, oder (b) es ist doch keine (b wird derzeit ignoriert)

'end if
#3
Access Programmierung / Re: FSO - Order/Pfad oder Date...
Letzter Beitrag von PhilS - Mai 25, 2024, 10:46:33
Zitat von: Jakomo am Mai 25, 2024, 10:00:14Frage: Bietet mir das FSO irgendwie eine schlanke Lösung?
zu prüfen, ob ich im filespec "nur" eine Pfadangabe, oder zudem auch eine Dateiangabe bekommen habe?
Jein. Das FSO hat keine Funktionen die direkt diese Funktionalität bieten, aber du kannst die GetFile/GetFolder-Methoden mit Fehlerbehandlung verwenden und dann aus deren Ergebnissen ableiten ob der Pfad auf eine Datei oder einen Ordner zeigt.

Private m_fs As Object

Private Property Get fs() As Object
    If m_fs Is Nothing Then
        Set m_fs = CreateObject("Scripting.FileSystemObject")
    End If
    Set fs = m_fs
End Property

Public Function IsFolder(ByVal filespec As String) As Boolean
    On Error Resume Next
    IsFolder = Not fs.GetFolder(filespec) Is Nothing
End Function

Public Function IsFile(ByVal filespec As String) As Boolean
    On Error Resume Next
    IsFile = Not fs.GetFile(filespec) Is Nothing
End Function


Zitat von: Jakomo am Mai 25, 2024, 10:00:14Wie kann ich den Pfad VOR dem entsprechenden Ordner "abschneiden", ohne wieder auf programmierte suchen nach "\" zurückzugreifen?

Die GetFile/GetFolder-Methoden liefern dir ja ein entsprechendes Objekt. Dessen .Name-Eigenschaft ist der reine Name des jeweiligen Objektes ohne den Pfad.
#4
Access Programmierung / Re: FSO - Order/Pfad oder Date...
Letzter Beitrag von MzKlMu - Mai 25, 2024, 10:17:41
Hallo,
prüfe ob im String ein Punkt vorhanden ist. Wenn ja, ist die Datei dabei.

Nur mal so auf die Schnelle.
#5
Access Programmierung / FSO - Order/Pfad oder Datei ?!...
Letzter Beitrag von Jakomo - Mai 25, 2024, 10:00:14
Ich denke wohl zu kompliziert..

Zum Problem:

Mittels einer Funktion die das FSO nutzt, will ich prüfen, ob und wo eine Datei oder ein Ordner (oder .SubFolders) liegt.
Dabei kann es vorkommen, dass als String (filespec) ein SubOrdner (wie "\subordner"), ein Pfad ohne Datei (wie "H:\stamm\hierhinein"), oder eine ganzer Pfad mit Datei ("H:\stamm\hierhinein\Beispieldatei.jpg" oder "H:\stamm\hierhinein\Beispieldatei.jpeg")
übergeben wird.

Und die erste Frage die in der Function zu lösen ist: "Hab ich einen Pfad oder einen Pfad mit Dateinamen bekommen?" (ungeachtet der Existenz von Datei oder Ordner)

Mittels "Exists" kann ich natürlich prüfen ob man mit dem String überhaupt was findet
Beispiel:
 
Function Pfadkontrolle(filespec As String) As Integer
 Set fs = CreateObject("Scripting.FileSystemObject")
    If fs.FolderExists(filespec) Then
    '...
    end if
    If fs.FileExists(filespec) Then
    '...
    end if
set fs = nothing
'end function

Sinnvoll wird das ganze aber erst, wenn ich vorher weiss, ob eine Datei im String mit angegeben wurde.
Warum?:
Prüfe ich ob der Ordner existiert  (FolderExists(filespec)) ,
aber es ist eine Datei in filespec mit dabei, gibt es naturgemäß und korrekt eine Fehlermeldung, obwohl der ordner durchaus existieren kann

Prüfe ich ob die Datei existiert  (FileExists(filespec)) ,
aber es ist gar keine Datei in filespec genannt, gibt es naturgemäß und korrekt ebenfalls eine Fehlermeldung, obwohl die fehlermeldung für die kommenden Ordneroperationen probleme macht.


Frage: Bietet mir das FSO irgendwie eine schlanke Lösung?
zu prüfen, ob ich im filespec "nur" eine Pfadangabe, oder zudem auch eine Dateiangabe bekommen habe?


Wie kann ich den Pfad VOR dem entsprechenden Ordner "abschneiden", ohne wieder auf programmierte suchen nach "\" zurückzugreifen?
Die Eigenschaft ".SubFolders" hilft mir da ja nicht und ".GetFolder" liefert mir auch keinen "reinen Ordnernamen".

Danke für Eure Hilfe


#6
Tabelle/Abfrage / Re: Verknüpfungen und Vorgehen
Letzter Beitrag von MzKlMu - Mai 24, 2024, 17:05:56
Hallo,
Zitatnur so ist es sinnvoll.
@Martin
Was willst Du damit sagen ?
Genau so ist ja mein Vorschlag für das Datenmodell aufgebaut.
#7
Tabelle/Abfrage / Re: Verwendung von Abfragen
Letzter Beitrag von MartinHan - Mai 24, 2024, 16:49:14
Vielen Dank!
#8
Tabelle/Abfrage / Re: Verwendung von Abfragen
Letzter Beitrag von PhilS - Mai 24, 2024, 16:39:11
Zitat von: MartinHan am Mai 24, 2024, 15:06:07Aber kann ich rausfinden, ob eine Abfrage als Datensatzquelle benutzt wird?
Im Ribbon: "Database Tools" -> "Object Dependencies" zeigt dir an, wo eine Tabelle/Abfrage verwendet wird, wenn sie direkt in der Datensatzherkunft oder Datenquelle verwendet wird.

Wenn die Abfrage im VBA-Code verwendet wird, hilft Suchen in der VBA-Umgebung. Bei der Verwendung in einem Ausdruck wird es schwierig. Da ist ein kommerzielles Tool wie Find and Replace eine riesen Hilfe.
#9
Microsoft Outlook / Re: Email Signaturen auswählen
Letzter Beitrag von markusxy - Mai 24, 2024, 16:34:19
Zitat von: ToBu am Mai 22, 2024, 16:36:24Der EmailText wird ignoriert und dadurch die Signatur übernommen

In EmailText fügst du einen Pfad ein und nicht den Inhalt einer Datei.
Abgesehen davon musst du den Inhalt via HTMLBody übergeben, da ein formatierter Text ja per HTML formatiert ist. Weiters müsstest du Bildern in der Signatur auch noch als Anhang hinzufügen.

Dieser Link könnte weiterhelfen:

#10
Tabelle/Abfrage / Re: Verknüpfungen und Vorgehen
Letzter Beitrag von MartinHan - Mai 24, 2024, 15:40:15
Hallo Klaus,

nur so ist es sinnvoll.
Ein Gebäude steht in einer Stadt
Ein Gebäude hat Geschosse
Ein Geschoss hat Räume
Ein Raum hat Wände
Es gibt Objekte
An einer Wand hängt etwas.
Man kann sich jetzt diverse Formulare vorstellen, je nach dem wie der Einstieg sein soll. Über Gebäube, Objekte oder Räume.

MfG

Martin