Top-Themen

Aktuelle Themen (A bis Z)

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 Wie wird die Reihenfolge bei WScript.Arguments.Count festgelegt bei gleichzeitiger Übergabe mehrerer Dateien per Drag and Drop

Mitglied: Vollnoob

Vollnoob (Level 1) - Jetzt verbinden

01.08.2010 um 15:54 Uhr, 6493 Aufrufe, 4 Kommentare

Hallo, ich bins nochmal.
Nochmal vorweg, habe leider keinerlei Programmier-Erfahrung.
Zu meinem Problem:
Wollte mehrere Textdateien gleichzeitig per Drag and Drop über WScript.Arguments.Count an Vb-Skript übergeben.
Die einzelnen Dateien sollten dann über die Argumente einzeln verarbeitbar sein. Klappt auch soweit, nur dass ich noch nicht verstanden habe, welches Argument welcher Datei zuordnet wird.
Weder die Dateinamen noch die "Anwähl-Reihenfolge" schienen mir bisher ausschlaggebend zu sein, welche Datei nun im Argument 0 oder 1 usw. landet.
Wie gesagt, bin leider ahnungslos .
Vielen Dank im voraus für eure Hilfe!
Mfg
Vollnoob
Mitglied: LotPings
01.08.2010 um 17:03 Uhr
Hallo Vollnoob,

das hängt davon ab wie du markierst und
welches Eement du anfasst zum drag'n'drop das wird das erste in der Liste.

Kannst du aber auch ausprobieren.
(SCript basiert auf Force Cscript von RobVanDerWoude)
01.
'  
02.
Option explicit 
03.
 
04.
Dim strArgs, strEngine, i, wshShell 
05.
Set wshShell = CreateObject( "WScript.Shell" ) 
06.
strEngine = UCase( Right( WScript.FullName, 12 ) ) 
07.
 
08.
strArgs = "" 
09.
If WScript.Arguments.Count > 0 Then 
10.
    For i = 0 To WScript.Arguments.Count -1 
11.
        strArgs = strArgs & Right(100+i,2) & " = " & WScript.Arguments(i) & vbCRLF 
12.
    Next 
13.
End If 
14.
 
15.
If strEngine <> "\CSCRIPT.EXE" Then 
16.
  MSGBOX(strArgs) 
17.
Else  
18.
  wscript.echo strArgs  
19.
End If
Gruß
LotPings
Bitte warten ..
Mitglied: Vollnoob
01.08.2010 um 17:20 Uhr
Hallo LotPings,
Besten Dank!
Daran wirds also festgemacht.
Nett von dir direkt das mit dem Ausprobier-Skript gleich mitreinzustellen, so wurds sofort klarer
Mfg
Vollnoob
Bitte warten ..
Mitglied: bastla
01.08.2010 um 19:37 Uhr
Hallo LotPings!

Wenn Du bei Aufruf über "WScript" ohnehin nicht einen Neustart des Scripts über "CScript" initiierst, ist die Unterscheidung hier eigentlich überflüssig - ein "WScript.Echo" erzeugt unter "WScript" sowieso eine Standard-MessageBox ...

Grüße
bastla
Bitte warten ..
Mitglied: LotPings
02.08.2010 um 08:02 Uhr
Hallo bastla,

du jast ja recht, aus Faulheit habe ich mich erinnert das da eine Argument-Sammel Routine drin war, und zu viel unnötiges drin gelassen.
Hier also eine kompaktere Version (die die Argumente ab 1 zählt):
01.
If WScript.Arguments.Count > 0 Then 
02.
  For i = 0 To WScript.Arguments.Count -1 
03.
    strArgs = strArgs & Right("   " & i+1,2) & " = " & WScript.Arguments(i) & vbCRLF 
04.
  Next 
05.
End If 
06.
wscript.echo strArgs 
Gruß
LotPings
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
Drag and Drop in Powershell
gelöst Frage von mc-doubleyouBatch & Shell2 Kommentare

Hallo zusammen, inwischen habe ich mich von cmd zur Powershell vorgearbeitet, die Lösungen die mir Google aber so liefert ...

Windows Server
Server Spinnt, Drag drop
gelöst Frage von dax4funWindows Server5 Kommentare

Tag Freunde, Windows 2008 r2 : Seit einiger Zeit Schalten sich einige Sachen wie Drag & Drop, Copy Paste ...

Visual Studio

GridView mit Drag-n-Drop oder vergleichbares

gelöst Frage von Aicher1998Visual Studio7 Kommentare

Guten Abend, nachdem ich bereits seit 4 Tagen an einem UserControl in C# getüftelt hab, aber nichts brauchbares geschafft ...

Batch & Shell

Übergabe von mehreren Dateien an eine EXE

gelöst Frage von golsinBatch & Shell2 Kommentare

Hallo alle zusammen, ich grübel schon seit mehreren Tagen an einem Script was mehrere Dateien zur Verarbeitung an eine ...

Neue Wissensbeiträge
Internet

Datendealing im WWW Tracking Methoden immer brutaler

Information von sabines vor 4 StundenInternet

Interessanter Artikel zum Thema Tracking im WWW und die immer "besseren" Methoden des Trackings. Professor Arvind Narayanan (Princeton-Universität) betreibt ...

Erkennung und -Abwehr

Ups: Einfaches Nullzeichen hebelte den Anti-Malware-Schutzt in Windows 10 aus

Information von kgborn vor 17 StundenErkennung und -Abwehr

Windows 10 ist das sicherste Windows aller Zeiten, wie Microsoft betont. Insidern ist aber klar, das es da Lücken, ...

Windows 10

Windows 10 on ARM: von Microsoft entfernte Info - Klartext, was nicht geht

Information von kgborn vor 19 StundenWindows 10

Windows 10 on ARM ist ja eine neue Variante, die Microsoft im Verbund mit Geräteherstellern am Markt etablieren will. ...

Microsoft
TV-Tipp: Das Microsoft-Dilemma
Information von kgborn vor 19 StundenMicrosoft12 Kommentare

Aktuell gibt es in Behörden und in Firmen eine fatale Abhängigkeit von Microsoft und dessen Produkten. Planlos agieren die ...

Heiß diskutierte Inhalte
Server
Route-Befehl Unterstützung (unter CMD)
gelöst Frage von FKRR56Server31 Kommentare

Guten Tag , i.M. habe ich Probleme über den CMD-Route-Befehl ein Routing auf einen entfernten Server zuzulassen. Der Server ...

Windows 10
Windows 10 (1709) Tastur und Maus wieder einschalten?
Frage von LochkartenstanzerWindows 1026 Kommentare

Moin, Ich habe von einem Kunden einen Win10-Rechner bekommen, bei dem weder Tastatur noch Maus geht. Die Hardware funktioniert ...

Firewall
RB2011 Firewall Rule eine bestimmte Mac oder IP Adresse nicht zu blockieren
Frage von lightmanFirewall15 Kommentare

Hallo liebes Forum mit ihren Spezialisten. Ich habe meine Firewall so konfiguriert das kein Endgerät ohne meine Speziellen Erlaubnis ...

Humor (lol)
Was könnte man mit einem Server machen? Idee gesucht
Frage von 2SeitenHumor (lol)15 Kommentare

Hey Zusammen Ich habe einen alten HP G2 Rackserver zu Hause rumliegen. 28GB Ram, 1xAMD Prozi mit etwa 2GHz. ...