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

Programm gesucht um Link zu Dateien auf Netzlaufwerken zu erstellen

Frage Internet Utilities

Mitglied: seejay

seejay (Level 1) - Jetzt verbinden

15.07.2009, aktualisiert 14:19 Uhr, 4293 Aufrufe, 3 Kommentare

Hallo,

für ein Intranet benötige ich ein Programm, welches sich am Besten in das Kontextmenü des Explorers anheftet und dort dann den Link zu einer Datei oder Ordner in die Zwischenablage kopiert. Da nicht zwingendermaßen bei jedem Benutzer die Laufwerke auf dem gleichen Buchstaben gemappt sind, müsste das Programm den Buchstaben in Server + Freigabe umwandeln.

Kennt ihr so ein Programm?

Vielen Dank
seejay
Mitglied: mrtux
15.07.2009 um 15:12 Uhr
Hi !

Zitat von seejay:
Kennt ihr so ein Programm?

Ja der Explorer. Warum legst Du keine Desktop-Verknüpfung zu dem Ordner auf dem Server an? Eine Verknüpfung kann auch aus einem UNC-Pfad bestehen.

mrtux
Bitte warten ..
Mitglied: napperman
15.07.2009 um 15:52 Uhr
Ich habe sowas mal mit einem Script für Outlook zusammengebaut:
erstelle eine Datei mit Namen path.vbs mit folgendem Inhalt:
'--snipp UncPath.vbs
Option Explicit
Dim ol, mail
Dim strUncPfad, WShNetwork, coldrives, i, strPath
Dim fso, path, DriveLetter
Dim Debug
Debug=False ' auf TRUE setzen für Meldungen
' übergebenen Pfad vom Explorer auslesen
Set fso = CreateObject("Scripting.FileSystemObject")
if Debug then wscript.echo fso.GetAbsolutePathName(wscript.arguments(0))
path=fso.GetAbsolutePathName(wscript.arguments(0))
Set fso = nothing
DriveLetter = Ucase(Left(path, 1))
path = Mid(path,3)
if Debug then Wscript.Echo "DriveLetter " & DriveLetter & " path:" & path 'Ausgabe des ersten Zeichen
Set WshNetwork = Wscript.CreateObject("Wscript.Network")
Set colDrives = WshNetwork.EnumNetworkDrives
On Error Resume Next
If colDrives.Count > 0 Then
For i = 0 To colDrives.Count - 1 Step 1
If colDrives(i)=DriveLetter & ":" then
if Debug then wscript.echo colDrives(i) & " ist " & colDrives(i+1)
strUncPfad=colDrives(i+1)
End if
Next
End If
Set WshNetwork = nothing
Set coldrives = nothing
if (len( strUncPfad) = 0) then
strUncPfad=DriveLetter & "\"
else
if Debug then wscript.echo "UNC-Pfad: [" & strUncPfad &"]"
End if
strPath = strUncPfad & path
if Debug then wscript.echo "strUncPfad + path: [" & strPfad & "]"
'Link an Outlook übergeben
Set ol = CreateObject ("Outlook.Application")
Set mail = ol.CreateItem(0)
mail.Display
with mail
.HTMLBody = "<HTML><BODY><A href=""file:///" & strPath & """>" & strpath & "</A> </BODY></HTML>" & mail.HTMLBody
End with
'--snapp UncPath.vbs

Diese Datei legst Du auf den Maschinen unter C:\ ab (geht ja Per Anmeldescript).
Auf den Maschinen muss jetzt noch folgende Registry eintrag vorgenommen werden.
Erstelle dafür eine *.reg mit folgendem Inhalt:

Windows Registry Editor Version 5.00

[HKEY_CLASSES_ROOT\*\Shell\Link an Outlook reichen]
[HKEY_CLASSES_ROOT\*\Shell\Link an Outlook reichen\command]
@="wscript c:\\Path.vbs \"%1\""

[HKEY_CLASSES_ROOT\Folder\Shell\Link an Outlook reichen]
[HKEY_CLASSES_ROOT\Folder\Shell\Link an Outlook reichen\command]
@="wscript c:\\Path.vbs \"%1\""

Nach dem man diese Regdatei ausgeführt hat, steht einem jetzt per Rechtsklick die Möglichkeit
"Link an Outlook reichen" zur Verfügung.

Das Snippet hab ich mal irgendwo hier im Forum gefunden
Bitte warten ..
Mitglied: seejay
16.07.2009 um 09:00 Uhr
boah vielen Dank! Genau das habe ich gesucht
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
Grafik
gelöst Grafiken Tabellen erstellen, Programm gesucht (6)

Frage von InvisibleQuantum zum Thema Grafik ...

Windows Server
Zuordnung von Netzlaufwerken mit Hilfe von Batch-Dateien (4)

Frage von doc-jochim zum Thema Windows Server ...

Windows Server
Backup-Programm mit SFTP Funktion gesucht (4)

Frage von hijacker99 zum Thema Windows Server ...

Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (33)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (21)

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

Viren und Trojaner
Aufgepasst: Neue Ransomware Goldeneye verbreitet sich rasant (20)

Link von Penny.Cilin zum Thema Viren und Trojaner ...