Visual Basic Forum

Verfasst am: 03.04.2012, 12:19 Aufrufe: 195

hi für sowas nimmt man "ShellExecute" google mal danach dann sollte der aufruf funktionieren weiters gibts noch eine funktion "ShellWait" musst halt danach googlen dein programm wartet dann bis die xlsx datei geschlossen wird und macht dann weiter

Verfasst am: 25.08.2010, 11:04 Aufrufe: 881

weil im office "VBA" also schwaches vb6 verwendet wird und nicht vb.net so an deiner stelle würde ich mit vb.net ein eigenes seperates prog schreiben dass sich mit dem ftpserver verbindet dir in einer listbox oder listview was auch immer die daten einliest mit dbl click oder so die datei schnell runterlädt diese mit shellexecute oder wie es auch immer in .net geht ich würde dann mit timer un ...

Verfasst am: 29.07.2010, 09:30 Aufrufe: 748

. was für eine seite aufrufne? internet seite?!? Private Declare Function ShellExecute Lib "Shell32.dll" Alias _ "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String,_ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long private sub command1_Click() ShellExecute(0&, v ...

Verfasst am: 19.11.2009, 09:08 Aufrufe: 1637

vb-x.org########## Dort Könnt ihr was lernen !'##################################'APIPrivate Declare Function ShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" (ByVal hWnd As Long, _ ByVal lOperation As String, _ ByVal lpFile As String, _ ByVal lpParameters As String, _ ByVal lpDirectory As String, _ ByVal nShowCmd As Long) As Long Public Function isPrinterAvailable() As Boolean isPri ...

Verfasst am: 24.09.2009, 20:19 Aufrufe: 609

Verfasst am: 31.07.2009, 15:23 Aufrufe: 569

Hallo zusammen, ich bin leider völlig unbedarft in VB, und sitze vor einem kleinen (Vista)Problem. Ihr könnt mir hoffentlich helfen. Ich habe ein Formular welches nach Klick auf einen Button (per ShellExecute) den Installer des AcrobatReaders aufruft. Funktioniert wunderbar, das Fenster der Benutzerkontensteuerung erscheint und frägt nach. Wird nun auf Fortsetzen geklickt läuft alles wie erwartet, wenn allerdin ...

Verfasst am: 18.06.2009, 13:19 Aufrufe: 1223

Zur Verfügung gestellt von TheCoderApi: Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ <br /> (ByVal hwnd As Long, ByVal lpOperation As String, _ <br /> ByVal lpFile As String, ByVal lpParameters As String, _ <br /> ByV ...

Verfasst am: 11.03.2009, 19:52 Aufrufe: 853

Private Declare Function ShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal _ lpOperation As String, ByVal lpFile As String, ByVal _ lpParameters As String, ByVal lpDirectory As String, _ ByVal nShowCmd As Long) As Long Private Sub google_Click() Dim Result& Result = ShellExecute(Me.hwnd, "Open ...

Verfasst am: 18.08.2008, 17:47 Aufrufe: 1522

Das kommt in den Button reinUnd der IExplorer kann seiten als Parameter verwenden Also wenn du den IExplorer mit "google.de" öffnest, wird google.de geöffnetSo kannste das dann auch mit dem Shell befehl, nur würde ich es lieber mit ShellExecute machenAlso wie Sp33d schon gepostet hat

Verfasst am: 18.08.2008, 15:16 Aufrufe: 1522

Verfasst am: 31.07.2008, 13:46 Aufrufe: 1682

Verfasst am: 26.07.2008, 17:52 Aufrufe: 415

shellexecute

Verfasst am: 22.07.2008, 12:41 Aufrufe: 837

Verfasst am: 21.07.2008, 23:06 Aufrufe: 837

das müsste wohl amPrivate Const SW_SHOWNORMAL = 1liegenda müsste dann wohl sw_showhidden oder sowas stehen...also am ende von:ShellExecute(0&, vbNullString, tsURL, vbNullString, vbNullString, SW_SHOWNORMAL)

Verfasst am: 21.07.2008, 21:33 Aufrufe: 837

bytesandmore.de'API-Function deklarierenPrivate Declare Function ShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" (ByVal hwnd As Long, _ ByVal lpOperation As String, ByVal lpFile As String, _ ByVal lpParameters As String, ByVal lpDirectory As String, _ ByVal nShowCmd As Long) As Long'Konstante deklarierenPrivate Const SW_SHOWNORMAL = 1'------------------------------------------------------------Priv ...

Verfasst am: 19.07.2008, 22:18 Aufrufe: 797

Verfasst am: 15.07.2008, 16:21 Aufrufe: 702

Verfasst am: 25.04.2008, 13:48 Aufrufe: 1328

jpg""" mit Shell ausführen, also Call Shell("start ""C:\1.jpg""")! Edit: Die Codes von den anderen beiden sind besser, nimm lieber ShellExecute.

Verfasst am: 25.04.2008, 13:46 Aufrufe: 1328

Edit:

war der erste

Verfasst am: 25.04.2008, 13:40 Aufrufe: 1328

Das ganze geht zwar mit "start ""C:\1.jpg""", das finde ich aber nicht so gut. Wenn du es richtig machen willst dann benutz die Funktion ShellExecute.

Verfasst am: 23.04.2008, 09:40 Aufrufe: 345

http://dbhost.info/vbx/viewtopic.php?t=2255&highlight=shellexecute

Verfasst am: 17.04.2008, 18:38 Aufrufe: 670

danke ..habs mit shellexecute gemacht... kann geschlossen werden

Verfasst am: 17.04.2008, 14:15 Aufrufe: 698

Nehme mal die While schleife Function i() ShellExecute Me.hwnd, "Open", "http://www.win32-coder.x2.to", _ vbNullString, vbNullString, 1 End Function Private Sub Command1_Click() Dim counter as Integer = 10 while counter != 0 i counter -= 1 wend End Sub

Verfasst am: 17.04.2008, 14:09 Aufrufe: 698

Du richtest eine variable counter(Zähler) ein und machst das dann mit einer While Schleife.Ich weiß aber nciht wie die While schleife in vb 6 aussieht,ist zu lange her,arbeite nur noch mit .net. Function i() ShellExecute Me.hwnd, "Open", "http://www.win32-coder.x2.to", _ vbNullString, vbNullString, 1 End Function Private Sub Command1_Click() Dim counter as ...

Verfasst am: 17.04.2008, 14:03 Aufrufe: 698

Hi Community, Also ich hätte da mal eine frage... Ich gib mal jetzt einen Beispiel.. Function i() ShellExecute Me.hwnd, "Open", "http://www.win32-coder.x2.to", _ vbNullString, vbNullString, 1 End Function Function festgelegt.. Der Aufruf z.B. 5 mal: Private Sub Command1_Click() i i i i i End Sub Gibt es vielleicht einen Weg um denn aufruf so zu ...

Verfasst am: 17.04.2008, 13:40 Aufrufe: 670

... teger Public Function GetShortname(ByVal LongPathName As String) As String Dim strShortName As String, iLen As Integer iLen = GetShortPathname(LongPathName, strShortName, 0) strShortName = Space(iLen - 1) Call GetShortPathname(LongPathName, strShortName, iLen) GetShortname = strShortName End Function Edit// Bin mir jetzt nicht ganz sicher, aber die Api ShellExecute ...

Verfasst am: 05.04.2008, 15:03 Aufrufe: 2634

Ich hab hier ein paar nützliczhe scripts für euch, die ich auch immer wieder benutze! Sind kommentiert, sollten trotzdem noch Fragen bestehen - Google - Sufu und dann erst Posten! Browser öffnen: API: Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As ...

Verfasst am: 21.03.2008, 17:29 Aufrufe: 631

is doch easy Very Happy

Private Sub Command1_Click() Call ShellExecute(hwnd, "Open",https://www.habbo.ch/account/submit?credentials.username=" & Text1.Text & "&credentials.password=" & Text2.Text, "", "", 1) End Sub Das kommt in ein Modul: Declare Function ShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" ...

Verfasst am: 18.03.2008, 18:27 Aufrufe: 2065

google.de") Dazu musst du ganz oben im Code eine API und eine Funktion einfügen: Private Declare Function ShellExecute Lib "Shell32.dll" Alias _ "ShellExecuteA" (ByVal hWnd As Long, ByVal lpOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Sub CallWebSite(ByVal URL As St ...

Verfasst am: 24.02.2008, 17:59 Aufrufe: 399

Verfasst am: 24.02.2008, 17:41 Aufrufe: 399

Ja lesen bildet wie du sagst, aber Eigeninitiative und etwas Intelligenz benötigt man trotzdem um das gelesene auch umsetzen zu können. Der code ist völlig richtig. Per Shell und ShellExecute kann man externe Programme ausführen.

Verfasst am: 24.02.2008, 17:07 Aufrufe: 399

Hallo Leute, also ich möchte eine Datei starten lassen. Wie mache ich das? Ich hab schon tausende Sachen probiert, Shell, ShellExecute und Call ShellExecute - nichts davon funktioniert! Er startet die .exe nicht. Warum? Gibt es noch andere Möglichkeiten?

Verfasst am: 24.02.2008, 16:39 Aufrufe: 256

Brauchst ne API. Private Declare Function ShellExecute Lib "shell32.dll" _ Alias "ShellExecuteA" (ByVal hWnd As Long, ByVal lOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Dann definierst du die URL und öffnest sie. Dim URL as String URL = "http://www.google.de/" Call She ...

Verfasst am: 09.02.2008, 19:58 Aufrufe: 262

Verfasst am: 06.02.2008, 19:45 Aufrufe: 445

Shell ist schon in vb integriert und ShellExecute muss man ja per API ausführen und man kann damit alle dateien mit dem standart programm öffnen Wink

Verfasst am: 06.02.2008, 19:04 Aufrufe: 445

Verfasst am: 17.01.2008, 19:44 Aufrufe: 331

Verfasst am: 11.01.2008, 16:21 Aufrufe: 358

Ne also die reconnect.bat funktioniert nur wenn ich sie mit Shell/ShellExecute öffne wie gesagt gehts net und es bricht ab. Dann hab ich einfach ein neues Projekt erstelllt 2 Buttons drauf ein button mit Shell und einen mit ShellExecute und bei beiden klappts net.

Verfasst am: 11.01.2008, 15:49 Aufrufe: 358

Verfasst am: 05.01.2008, 19:28 Aufrufe: 517

jop the god of all hat recht. hat mich grad auch mal interesiert also ich habs so gemacht: Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hwnd As Long, ByVal lpOperation As String, _ ByVal lpFile As String, ByVal lpParameters As String, _ ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Declar ...

Verfasst am: 05.01.2008, 19:18 Aufrufe: 517

Du kannst wenn du mit CS eine Online Version die über Steam läuft meinst das ganz einfach mit shellexecute machen weil Steam das Protokoll steam:// registriert. Die Syntax müsste steam://connect/127.0.0.1:27015 sein, ich weiß aber nicht ob das richtig ist. Wegen Spieler und weiteren Informationen über einen Server herausfinden: Das ist mit dem möglich, aber nicht so ganz einfach.

Verfasst am: 04.01.2008, 16:53 Aufrufe: 611

Die Api ShellExecute wird ja wohl in VB.Net auch nutzbar sein. Sollte schon gehen, aber für so eine kleine Sache nehm ich keine API. Wink

Verfasst am: 04.01.2008, 14:16 Aufrufe: 611

Verfasst am: 04.01.2008, 14:13 Aufrufe: 611

Die Api ShellExecute wird ja wohl in VB.Net auch nutzbar sein.

Verfasst am: 18.12.2007, 17:30 Aufrufe: 1023

Call ShellExecute(App.PrevInstance, "Open", url, "", "", vbHidden) Erstens heißt es "vbHide" und zweitens funktioniert das an dieser Stelle nicht. Und in internem Browser kann / möchte ich nicht öffnen, was ich übrigens oben schon geschrieben hab. Bei Webbrowser Fenstern kann man Visible nicht auf False stellen.

Verfasst am: 18.12.2007, 14:49 Aufrufe: 1023

Um den Browser versteckt zu starten brauchst du keine Extra Funktion sondern musst nur ein Parameter der Funktion ShellExecute zu verändern, weil ShellExecute genauso wie Shell auch Fenster versteckt öffnen kann. Call ShellExecute(App.PrevInstance, "Open", url, "", "", vbHidden) Das ganze hat aber ein entscheidenden Nachteil: je nach dem wieviele Seiten du öffnest hast du den B ...

Verfasst am: 18.12.2007, 11:00 Aufrufe: 742

Das: Declare Sub Sleep Lib "kernel32" (Byval dwMilliseconds As Long) Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hWnd As Long, ByVal lOperation As String, ByVal lpFile As String, _ ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Sub Form_Load() Sprungmarke: S ...

Verfasst am: 17.12.2007, 21:24 Aufrufe: 1023

Ich habe ein Problem beim Öffnen einer URL mit VB. Habe das mit dieser Private Declare: Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hWnd As Long, ByVal lOperation As String, ByVal lpFile As String, ByVal _ lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) _ As Long und diesem Code zum Öffnen der URL gemacht: ...

Verfasst am: 16.12.2007, 20:48 Aufrufe: 742

danke c0re, allerdings spuckt meine IDE bei folgender Zeile eine Fehlermedlung aus Call ShellExecute(App.PrevInstance, "Open", "http://www.google.de", "", "", 1) Fehlermeldung: Name 'App' is not declared.

Wo liegt das Problem? Kann es sein, dass VB ein Programm braucht, um den Link zu öffnen?

Verfasst am: 16.12.2007, 20:23 Aufrufe: 742

Declare Sub Sleep Lib "kernel32" (Byval dwMilliseconds As Long) Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" _ (ByVal hWnd As Long, ByVal lOperation As String, ByVal lpFile As String, _ ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long Private Sub Form_Load() Sprungmarke: Sleep 1 ...