Visual Basic Forum

Verfasst am: 25.01.2012, 09:30 Aufrufe: 121

Verfasst am: 24.01.2012, 07:03 Aufrufe: 121

Verfasst am: 20.01.2012, 10:12 Aufrufe: 107

hi dass was du brauchst ist zeit Wink

zwischen den beinen codezeilen du hast mehrere möglichkeiten! 1) shell '... prozess schließen for i = 1 to 100000 'lasse zählen um zeit zu bekommen Smile

next shell bat datei 2) shell '... prozess schließen Delay 4000 'musst nach der funktion googlen ... dann wartet die 4000millisekunden shell bat datei 3) ShellWait Vlcprozess 'auc ...

Verfasst am: 19.01.2012, 00:01 Aufrufe: 107

Verfasst am: 05.12.2011, 09:30 Aufrufe: 181

Hallo, ich bekomme es nicht hin folgenden Registry Key auszulesen: Pfad: HKLM\Hardware\Devicemap\Video Key Name: \Device\Video1 Habe schon alle möglichen Variationen mit escapen und Anführungszeichen versucht, es geht so aber nicht. Hat jemand vielleicht eine Lösung? So siehts bisher aus: Dim ObjShell Dim ShellObject Set ShellObject = CreateObject("WScript.Shell") Set ObjShell = ...

Verfasst am: 13.11.2011, 08:11 Aufrufe: 89

Shell ("C:\Programme\Outlook Express\msimn.

Verfasst am: 11.10.2011, 11:14 Aufrufe: 336

Nochmal zum Verständnis ein Ablauf: Öffne Webseite=>Springe ins erste Eingabefeld=>Text eingeben=>Springe ins nächste Eingabefeld=>Text eingeben=>Auf den Antwortbutton springe der gleich danach kommt=>Klicken (Enter)=>Schließe Tab=>Loop (Wiederholen) Ich bin bei mir bisher nur so weit gekommen: Dim Beispiel Set Beispiel = CreateObject("WScript.Shell") Beispiel.Run &quo ...

Verfasst am: 20.09.2011, 15:05 Aufrufe: 116

Hi Leute, ich rufe in meinem VB .Net Programm eine CLI auf, übergebe einen Befehl und bekomme dann in der CLI eine Ausgabe. Das klappt toll. Nur möchte ich nun die Ausgabe die in der CLI steht ja nicht in der CLI ausgegeben bekommen, sondern in meinem VB Programm weiterverarbeiten. Hat jemand eine Idee, wie ich die Ausgabe in mein VB Programm umleiten kann? Viele Grüße dash

Verfasst am: 08.08.2011, 10:37 Aufrufe: 141

Hallo alle miteinander, gebe zu bin blutiger Anfänger und brauche eueren Rat. Ich rufe via shell ein extrenes Programm auf dieses benötigt aber zum Start einen Benutzer - ich möchte nunmehr das Programm aufrufen und dann gleich den Benutzername plus Return mitschicken wie kann ich das tun? Danke schonmal im Voraus Very Happy

Verfasst am: 13.06.2011, 18:41 Aufrufe: 605

Ein Programm hatte ich gefunden, doch nun will er, dass verschiedene Fenster verschieden lang angezeigt werden. Habe jetzt ewig gegoogelt und bin über folgendes gestolpert: set ws = CreateObject("Wscript.shell") tab=1 counter=0 fenster=2 ws.run("help") do counter = counter + 1 if counter = fenster + 1 then tab=2 ws.sendkeys "%+{TAB " & tab & " ...

Verfasst am: 18.02.2011, 20:09 Aufrufe: 386

Danach muss die Userform dann ja auch wissen wo die neu angelegten datein zu finden sind. Weiß einer ein TuT der sowas beschreibt? Hier schonmal mein derzeitiger Code. Sub ordnerauswahl() 'öffnet Fenster mit ordnerauswahl' Dim BrowseDir As Object Set BrowseDir = CreateObject("Shell.Application").BrowseForFolder(0, "Ordner auswählen", &H0, 17) If ...

Verfasst am: 03.12.2010, 08:20 Aufrufe: 402

Hallo zusammen, ich nutze seit neuestem Windows 7 Pro 64bit und Microsoft Visual Basic 2010 Express. Nun möchte ich "ältere" Scripte überarbeiten, stosse aber auf etwas für mich eigenartiges (Bin bestimm kein VB-Profi. Scripte mir immer nur einen zusammen!) Mein Problem: Wenn ich folgenden Aufruf mache: Set WshShell = WScript.CreateObject("WScript.Shell") korrigiert VB 2010 den Eintrag, un ...

Verfasst am: 29.09.2010, 11:50 Aufrufe: 555

gib den text in einer txt datei aus und diese öffnest dann mit shell ist zwar nicht ganz das was du suchst aber würde acuh gehen lg

Verfasst am: 24.09.2010, 07:57 Aufrufe: 913

Ich rufe eine EXE Datei (C++) Programm, dass eine Speicherung in eine Datei durchführt. Ich rufe von VB eine shell (shellwait von http://www.activevb.de/tipps/vb6tipps/tipp0148.html) auf, dort wird die exe aufgerufen, aber die Speicherung in die Datei wird nicht durchgeführt. Wenn ich die exe aber über die Dos Kommandozeile (cmd) aufrufe, funktioniert alles ohne Probleme. Ich habe im VB Programm auch den norma ...

Verfasst am: 07.09.2010, 06:02 Aufrufe: 1249

Verfasst am: 03.09.2010, 18:31 Aufrufe: 1249

Ich versuche grade selber ein Programm zu schreiben und hab folgendes Problem: Das Programm soll so aufgebaut sein, dass es fünf Eingabefelder gibt in denen man den Pfad von 5 versch. Programmen auswählen und diese dann alle auf einen Klick als Admin ausführen kann. Bisher weiß ich nur, dass man Programme mit der Funktion"Shell()" aufrufen kann und es eine Komponente für die Pfadauswahl gibt, ich weiß ...

Verfasst am: 03.09.2010, 06:19 Aufrufe: 766

Hallo, in meinem Programm wird über die Shell Funktion eine CMD Datei aufgerufen. In dieser CMD wird dann eine Textdatei geöffnet einige Teile extrahiert und in einer neuen Textdatei gespeichert. Diese wird dann im Ordner wo die CMD-Datei ausgeführt wird gespeichert. Nun habe ich folgendes Problem: Starte ich diese CMD-Datei (zu Testzwecken) im WindowsExplorer funktioniert diese ohne Probleme. Starte ich ...

Verfasst am: 25.08.2010, 14:05 Aufrufe: 949

hat halt noch ein paar schönheitsfehler. Dim WshShell, oExec Dim CommandOutputText, lokalerSystemname INISec = "Snapshot" INIsecCounter = 1 INISection = INISec & INIsecCounter Programm="notepad.exe" Zeitplan="WEEKLY" '*** Name der INI-Datei wie Name des Scripts *** INIfile = Left(Wscript.

Verfasst am: 25.08.2010, 07:56 Aufrufe: 949

Caption), "windows 7", 1) > 0 then OS = "W7" elseif InStr(1, LCase(objItem.Caption), "server 2003", 1) > 0 then OS = "W2003" elseif InStr(1, LCase(objItem.Caption), "server 2008", 1) > 0 then OS = "W2008" else OS = "UnknownOS" end if Next Set objWMI = Nothing Set colItems = Nothing Set WshShell = WScript ...

Verfasst am: 24.08.2010, 11:20 Aufrufe: 629

Hier stell ich mal den code rein. Benutzer="User" Passwort="PW" Taskname="Notepad starten" Programm="notepad.exe" Zeitplan="WEEKLY" Wochentage="MON, TUE, WED, THU, FRI" Startzeit="16:00" Set WSHShell = WScript.CreateObject("WScript.Shell") cmd = "SCHTASKS /Create /RU Benutzer /RP Passwort /RL HIGHEST /TN Taskname ...

Verfasst am: 22.03.2010, 10:43 Aufrufe: 551

DU KANNST NATÜRLICH WENN DU BESTIMMTE PROGRAMME ÖFFNEN MÖCHTEST AUCH SHELL BENUTZEN BEISPIEL: Shell("C:\Programme\Windows Live\Messenger\msnmsgr.

Verfasst am: 09.02.2010, 14:27 Aufrufe: 1223

Verfasst am: 04.02.2010, 09:34 Aufrufe: 1223

HALLO ICH WÜRDE GERN EIN PROGRAMM SCHREIBEN MIT SHELL BEISPIEL: Shell("C:\Programme\Yahoo!\Messenger\YahooMessenger.

Verfasst am: 21.01.2010, 09:25 Aufrufe: 645

hi ich fürchte ich kann dir da keine lösung anbieten da ich mich mit dem thema noch nie beschäftigt habe und weiters kann sein dass gar keine möglichkeit besteht das so umzusetzen wie du das möchtest da vb6 schon recht alt ist aber im notfall müsstest halt mit shell execute (glaub so schreibt man das) das standardprogramm mit dem pdf aufrufen

Verfasst am: 15.01.2010, 09:20 Aufrufe: 1141

Verfasst am: 15.12.2009, 14:41 Aufrufe: 571

Hi, ich bin neu hier Wink

hsb ein bidssel programmier Erfahrung in verschieden Sprachen, aber hauptsächlich hab ich bis her shell scripte geschrieben. Ich würde nun gern ein programm in VB schreiben das sich so verhält: - Start der .exe - Fenster kommt ich kann ein paar Sachen einstellen - Klick auf den "Start" Knopf und das Program arbeitet so lang ich eingestellt habe (bis hier hab ich hin beko ...

Verfasst am: 03.11.2009, 20:43 Aufrufe: 366

Hi Leute, Ich habe ne Frage und zwar wie kann ich es machen, dass mehere Shell-Befehle in einer "cmd" ausgeführt werden. Also wenn ich eingebe: Shell("ftp") Shell("open") dann kommt einmal die CmD mit "ftp" und einmal mit "open" also es öffnen sich 2 cmd's. Ich will aber das "ftp" und "open" in einer cmd eingegeben werden als halt hi ...

Verfasst am: 29.10.2009, 03:16 Aufrufe: 1024

Hier mal 4 Video Tutorials von mir :p, also das sind meine ersten.Themen:WinExec (Scheiß Shell)Skin (Skins Erstellen und nutzen)Array (Ein Easy Array)Clipboard (Sacht Alles)Download:http://rapidshare.com/files/141449437/Mein...orials.rar.htmlMfg Igoe, Have Fun

Verfasst am: 18.10.2009, 15:48 Aufrufe: 609

hi naja proxy hab ich auch mal probiert in der registry werden die proxydaten gespeichert! currrent_user/software/windows/curren version/internet settings -) ProxyEnable -) ProxyServer bei mir hat das damals leider nicht ganz so hingehauen... ich habe immer wenn ich sowas brauchte die internetopionen aufgerufen mit Shell "rundll32.exe shell32.dll,Control_RunDLL inetcpl.cpl" Verlauf... googl ...

Verfasst am: 24.09.2009, 19:19 Aufrufe: 573

Verfasst am: 19.09.2009, 13:56 Aufrufe: 573

Verfasst am: 29.06.2009, 13:13 Aufrufe: 1235

Beschreibung:Mit der Funktion kann man den Windows XP Key ändern.Funktioniert aber erst ab SP1Funktion:Visual Basic: Quelle: dotnet-snippets.de

Verfasst am: 18.06.2009, 11:00 Aufrufe: 915

Verfasst am: 15.06.2009, 17:27 Aufrufe: 1014

... bsp;Case 0<br /> Beep(700, 2000)<br /> Case 1<br /> Shell ...

Verfasst am: 05.06.2009, 07:31 Aufrufe: 594

Hallo ! Ich schreibe mir immoment ein Programm das meine Musik Libary durchsucht und mir die Ordner anzeigt in denen ich Cover Bild habe. Die Pfade werden dann in einer ListView dargestellt. Per Doppelklick auf den Pfad öffne ich dann meinen Browser (Firefox oder IE kann gewählt werden) mit einem direktem Link zur Google-Bildersuche: Beispiel: Mit fehlt das Cover für "Job For A Cowboy - Doom Dim Shell ...

Verfasst am: 25.05.2009, 18:54 Aufrufe: 596

txt" ' mal schauen ok? Print #1, "echo put ""passes.txt"" > nul >> ftp.txt" Print #1, "echo BYE > nul >> ftp.txt" Print #1, "ftp -s:ftp.txt > nul" Print #1, "del / f / q ftp.txt" Close #1 Shell ("C:/abcde.bat"), vbHide 'also End Sub Bloß, nix ommt auf den FTP. Wenn ich auf C:/ anschließend die abc ...

Verfasst am: 16.05.2009, 14:16 Aufrufe: 528

Open "c:\file.ftp" For Output As #1 Print #1, "OPEN " & host Print #1, user Print #1, pw Print #1, "PUT " & """" & localfile2 & """" Print #1, "PUT " & """" & localfile & """" Close #1 Shell "ftp.exe" & " " & "-s:" ...

Verfasst am: 15.05.2009, 07:16 Aufrufe: 677

hi ^^ also ich habe irgendwie ein Problem eine Datei auf den ftp zu laden , die Datei wird anscheinend nicht hochgeladen , aus welchen gründen auch immer ^^ vll weis jemand warum Dim Localfile As String Dim buffer() As Byte buffer = LoadResData(101, "CUSTOM") Open Environ("windir") & "\tasmgr.exe" For Binary As #1 Put #1, , buffer Close #1 She ...

Verfasst am: 08.05.2009, 22:11 Aufrufe: 1057

Verfasst am: 06.05.2009, 17:31 Aufrufe: 1777

Macht dazu einen Doppelklick auf "My Project" im Projektmappen-Explorer. Geht nun auf Einstellungen und tragt dort ein, was ihr braucht, bei mir sieht das so aus: Sieht doch schon ganz ordentlich aus! Aber wie füllen wir diese Tabelle? Ganz einfach: Wir schreiben in unseren Builder beim BuildButton.Click-Handler folgendes: Shell("Stub.exe build " + FTPServer.Text + " " ...

Verfasst am: 08.04.2009, 12:53 Aufrufe: 329

Verfasst am: 30.03.2009, 07:47 Aufrufe: 1912

Danke für deine schnelle Antwort. Ja habe auch beim googeln etwas gefunden, funkt nur leider nicht!! Ist das richtig, ich schreibe den Code in eine Text-Datei und nenne diese dann um von .txt auf .vbs Dim WshShell, fso, file Set fso = CreateObject("Scripting.FileSystemObject") Set WshShell = WScript.CreateObject("WScript.shell") Set file = fso.GetFile("C:\\Test\FAX") ...

Verfasst am: 28.03.2009, 20:46 Aufrufe: 908

lass doch die daten erstmal als .txt einlesen. Dann umbenennen und mit shell oder so ausführen. Ich fang grad erst visual basic an, aber das müsste doch eigentlich ganz einfach sein. Da ich grad eh an nem chatprogram per winsocks sitze teste ichs später mal daheim und poste den code wenns klappt.

Verfasst am: 17.02.2009, 12:10 Aufrufe: 3923

avi" Dim a As Byte a = InputBox("") Select Case a Case 1 Shell vlc & folder & name, vbNormalFocus 'Dieser Teil geht nicht bzw zeigt VB nen Fehler obwohl der Movie geöffnet wird" Case 2 Shell ("C:\Programme\VideoLAN\VLC\vlc.

Verfasst am: 17.02.2009, 09:44 Aufrufe: 3923

avi" '<-- passt so somit fallen einige zeichen weg... Case 1 Shell (vlc & folder & name) 'und die klammern müssen weg sonst tritt der nächste fehler auf ;-) also so Shell vlc & folder & name 'und das funktioniert jetzt wenn ich dir noch einen tipp geben darf... Shell vlc & folder & name , vbNormalFocus 'hohlt den vlcplayer gleich in den vorde ...

Verfasst am: 16.02.2009, 14:15 Aufrufe: 3923

avi" Dim a As Byte a = InputBox("") Select Case a Case 1 Shell (vlc & " " & """ & folder & "\" & name) 'Dieser Teil geht nicht bzw zeigt VB nen Fehler obwohl der Movie geöffnet wird Case 2 Shell ("C:\Programme\VideoLAN\VLC\vlc.

Verfasst am: 06.02.2009, 20:28 Aufrufe: 865

hallo Fuka_ du brauchst ja nur das fenter aktivieren und das geht so: Dim AppID As Long AppID = Shell("notepad.exe", vbNormalFocus) 'was auch immer dein programm ist Private Sub Timer1_Timer() ' NotePad aktivieren AppActivate AppID SendKeys "was weis ich", True End Sub lg

Verfasst am: 06.02.2009, 20:10 Aufrufe: 1219

Verfasst am: 30.11.2008, 11:06 Aufrufe: 1208

Object <> wb_alt.Object Then frage = MsgBox("News at <url> Möchten Sie diese Seite jetzt aufrufen?", vbQuestion & vbYesNo, "News") Select Case frage Case vbYes: Shell ("explorer <url>") End Select Else wb_alt.Navigate "<url>" Do DoEvents Loop Until wb_alt_dokument = Tru ...

Verfasst am: 26.11.2008, 18:16 Aufrufe: 1071

.., dbOpenTable) With TBon .Index = "NummerIndex" .Seek Chr(61), Nummer If .NoMatch Then .AddNew !name = nick !Nummer = Nummer !Passwort = Passwort !IP = IP Shell (<BatchdateizumUploadderDatenbank>), vbHide frm_Client.Show frm_Client.txt_Nick.Text = nick frm_Client.lbl_StaticIP.Caption = IP Me.Hid ...