Visual Basic Forum

Visual Basic Forum
für VB6 und VB.NET Programmierer
 
RegistrierenRegistrieren  LoginLogin
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten
Autor
Nachricht
Fuka_
Coder
Coder



Anmeldedatum: 15.11.2007
Beiträge: 96

Shell - Problem
Verfasst am: 25.04.2008, 13:35

Heyho leute!

Ich habe in eine Button das hier geschrieben:
Code:
shell("C:\1.jpg")


Mit einer .exe geht das aber mit andern sachen nicht. Sad

Wie mache ich das? Hab in der SuFu nichts gefunden ...

MfG
 
The-God-of-all_
Poster
Poster

Anmeldedatum: 20.05.2007
Beiträge: 170
Wohnort: App.Path


Verfasst am: 25.04.2008, 13:40

Fuka hat Folgendes geschrieben:
Wie mache ich das? Hab in der SuFu nichts gefunden ...


Dann hast du nicht richtig gesucht. Die Funktion Shell so wie sie in VB integriert ist kann nur ausführbare Dateien starten. 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.


Zuletzt bearbeitet von The-God-of-all_ am 25.04.2008, 13:44, insgesamt einmal bearbeitet
 
Fuka_
Coder
Coder



Anmeldedatum: 15.11.2007
Beiträge: 96


Verfasst am: 25.04.2008, 13:43

Code:
Call "start ""C:\1.jpg"""


geht nicht.

Kannst du mir ein beispiel geben?

MfG
 
jojo4ever_
Poster
Poster

Anmeldedatum: 22.07.2007
Beiträge: 108


Verfasst am: 25.04.2008, 13:46

ShellExecute

Edit:
Razz war der erste


Zuletzt bearbeitet von jojo4ever_ am 25.04.2008, 13:49, insgesamt einmal bearbeitet
 
tr4st_
« Moderator »<b><font color=green>« Moderator »</font



Anmeldedatum: 17.12.2007
Beiträge: 315
Wohnort: Private Class _ Villa()


Verfasst am: 25.04.2008, 13:48

Code:
Private Declare Function ShellExecuteA Lib "shell32.dll" ( _
    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
Function ShellExec( _
    ByVal Path As String, _
    Optional ByVal WindowStyle As VbAppWinStyle = vbNormalFocus, _
    Optional ByVal Operation As String = "open" _
  ) As Boolean
 
  ShellExec = ( _
      ShellExecuteA(0&, Operation, Path, _
      vbNullString, vbNullString, WindowStyle) > 32)
End Function
   

Private Sub Command1_Click()
    ShellExec "c:\1.jpg"
End Sub


Edit: Kann vorkommen Wink ich war in den zwei Minuten am schreiben Razz
Avoid Suspicion, Manipulate your friends, Eliminate your enemies.


Zuletzt bearbeitet von tr4st_ am 25.04.2008, 13:51, insgesamt einmal bearbeitet
 
The-God-of-all_
Poster
Poster

Anmeldedatum: 20.05.2007
Beiträge: 170
Wohnort: App.Path


Verfasst am: 25.04.2008, 13:48

Du sollst wenn überhaupt das "start ""C:\1.jpg""" mit Shell ausführen, also Call Shell("start ""C:\1.jpg""")!

Edit: Die Codes von den anderen beiden sind besser, nimm lieber ShellExecute.
 
Fuka_
Coder
Coder



Anmeldedatum: 15.11.2007
Beiträge: 96


Verfasst am: 26.04.2008, 08:00


Jo danke für die antworten!

Klappt alles wunderbar. Smile
 
Neues Thema eröffnen   Neue Antwort erstellen    Visual Basic Forum Foren-Übersicht -> [VB6] Fragen - Antworten

Tags: shell

 
 Verwandte Themen   Aufrufe   Letzter Beitrag 
Keine neuen Beiträge Button/Text 958 18.06.2009, 16:21
Keine neuen Beiträge E-Mail bekomm nach Button klicken 713 02.10.2007, 17:45
Keine neuen Beiträge Bestimmten "Button" auf Website klicken 1684 14.09.2007, 21:27
Keine neuen Beiträge webbrowser/ webformular button klicken 1611 23.07.2007, 23:07
Keine neuen Beiträge Button drücken.. 842 01.07.2007, 13:19
 


[ Time: 0.0621s ][ Queries: 98 (0.0213s) ][ GZIP on - Debug on ]