Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

Mit VBA-Code ein Verzeichnis erstellen

Frage Microsoft

Mitglied: DockMaster-de

DockMaster-de (Level 1) - Jetzt verbinden

17.01.2015, aktualisiert 21:14 Uhr, 1090 Aufrufe, 2 Kommentare

Hallo,

ich habe mit MS Access 2010 eine Datenbank und ein Frontend. Daten werden über ein Formular eingegeben.
Ich möchte zu jedem Datensatz ein Verzeichnis auf einem Server anlegen lassen wo ich Dokumente zum Datensatz
ablegen kann.

Beim drücken des Buttons soll folgendes geschehen:

1. Überprüfung ob das Verzeichnis vorhanden ist ==> ja, Verzeichnis öffnen
2. Überprüfung ob das Verzeichnis vorhanden ist ==> nein, Verzeichns anlegen und Verzeichnis öffnen

So sollte es dann aussehen \\server\verzeichnis\...\ID-Nr.

Leider habe ich keine VBA Kentnisse

Können die Profis mir ein paar Codebeispiele zur Verfügung stellen?


have a nice day...

DockMaster
Mitglied: 114757
17.01.2015, aktualisiert um 23:08 Uhr
01.
Dim fso, objShell, strPath 
02.
strPath = "\\server\verzeichnis\" & Me.ID 
03.
set objShell = CreateObject("WScript.Shell") 
04.
Set fso = CreateObject("Scripting.FilesystemObject") 
05.
if not fso.FolderExists(strPath) then 
06.
    fso.CreateFolder strPath 
07.
End if 
08.
objShell.Run "explorer.exe /e," & strPath 
09.
Set fso = Nothing 
10.
Set objShell = Nothing
Zeile 2 ist anzupassen, ebenso wie der Name des Feldes in der die ID steht.

Gruß jodel32
Bitte warten ..
Mitglied: DockMaster-de
18.01.2015, aktualisiert um 03:30 Uhr
Hallo jodel32,

hiermit gebe ich dir ein virtuelles Bier aus!
Geiler Code....

Besten Dank für die Hilfe

Gruss aus Bochum

DockMaster
Bitte warten ..
Ähnliche Inhalte
VB for Applications
gelöst Mehrere Charts per VBA erstellen lassen, Titel wird nicht angezeigt

Frage von Aximand zum Thema VB for Applications ...

VB for Applications
Aus VBA E-Mail und HTML Dokument erstellen lassen (3)

Frage von Pago159 zum Thema VB for Applications ...

Datenbanken
gelöst Access Report per Email versenden, hat jemand zufällig einen Code dafür(VBA) (7)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Neue Wissensbeiträge
Peripheriegeräte

Was beachten bei der Wahl einer USV Anlage im Serverschrank

(2)

Tipp von zetboxit zum Thema Peripheriegeräte ...

Windows 10

Das Windows 10 Creators Update ist auf dem Weg

(5)

Anleitung von BassFishFox zum Thema Windows 10 ...

Administrator.de Feedback

Tipp: Ungelöste Fragen ohne Antwort in Tickeransicht farblich hinterlegen

Tipp von pattern zum Thema Administrator.de Feedback ...

Viren und Trojaner

Neue Magazin Ausgabe: Malware und Angriffe abwehren

Information von Frank zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Windows Systemdateien
Warum System auf "C:" (29)

Frage von DzumoPRO zum Thema Windows Systemdateien ...

LAN, WAN, Wireless
Cisco SG200: Auf bestimmtem vLAN bestimmte TCP-Ports sperren (16)

Frage von SarekHL zum Thema LAN, WAN, Wireless ...

Windows Server
gelöst Update BackupExec 2015 auf 2016 führt zu SQL-Server Problem (16)

Frage von montylein1981 zum Thema Windows Server ...

Cloud-Dienste
gelöst Bitcoins minen über Nacht? (16)

Frage von 1410640014 zum Thema Cloud-Dienste ...