|
Registrieren
Login
Autor
christopher.g_
Tutorial Leser
Anmeldedatum: 10.12.2007
Beiträge: 72
VLC Player -> Video Starten...
Verfasst am: 28.02.2008, 09:09
hi leute
ich möchte mit über visual basic ein video mit dem vlcplayer öffnen...
Code:
Shell "C:\Programme\VideoLan\VLC\vlc.exe"
Soweit funktionierts ja...
zum öffnen hab ich so probiert...
Code:
Shell "C:\Programme\VideoLan\VLC\vlc.exe C:\Testvideo.avi"
'Geht auch
'sobald ein abstand im Pfad
Shell "C:\Programme\VideoLan\VLC\vlc.exe C:Beliebiger Ordner\testvideo.avi"
'ist meldet Vlc einen Fehler
Unabel to open 'C.\Beliebiger'
Unabel to open 'Ordner\Testvideo.avi'
Habt ihr vielleicht eine lösung
danke schon mal im vorraus
lg grün
_________________
remember:
ein wahrer freund ersticht dich von vorne
ZiG_
Überflieger
Anmeldedatum: 07.03.2007
Beiträge: 1248
Verfasst am: 28.02.2008, 09:27
Den Pfad zum Film nochmal in Anführungsstriche.
Code:
Shell "C:\Programme\VideoLan\VLC\vlc.exe ""C:Beliebiger Ordner\testvideo.avi"""
_________________
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
christopher.g_
Tutorial Leser
Anmeldedatum: 10.12.2007
Beiträge: 72
Verfasst am: 28.02.2008, 09:39
hi zig
ist echt verrückt...
weil ich habs ja schon ein paar mal probiert ebenfalls den pfad unter anführungzeichen...
es macht einen unterschied ob ich es so schreibe..
vlc.exe""C:\Belieb oder so
vlc.exe ""C:\Belieb
vielen dank für deine hilfe!!!
Edit//
Ja jetzt ist noch ein kleines porblem aufgetaucht...
wie kann ich da variable einbinden...???
wie z.b. app.path oder einen eintrag einer combobox
lg
Edit by ZiG
Verwarnung wegen Doppelpost.
_________________
remember:
ein wahrer freund ersticht dich von vorne
ZiG_
Überflieger
Anmeldedatum: 07.03.2007
Beiträge: 1248
Verfasst am: 28.02.2008, 10:19
Mit "&".
Beispiel:
Code:
Shell "C:\Programme\VideoLan\VLC\vlc.exe """ & App.Path & "\testvideo.avi"""
_________________
Wer nicht auf seine Weise denkt, denkt überhaupt nicht. (Oscar Wilde)
Jolo_
Coder
Anmeldedatum: 20.03.2007
Beiträge: 210
Verfasst am: 28.02.2008, 12:10
ähm es gibt eine extra komponente für den VLC player
schau mal in den komponenten 
MfG Jolo
_________________
sollniss_
Coder
Anmeldedatum: 08.09.2007
Beiträge: 212
Verfasst am: 28.02.2008, 17:12
die gibts zwar schon aber irgendwie blick ich da net durch wie man da nu nen vid abspielen kann, kann das mal jemand erklären? wäre sehr verbunden^^
_________________
http://sollniss.1x.to/
*andi*
Newbie
Anmeldedatum: 02.02.2009
Beiträge: 6
Verfasst am: 16.02.2009, 14:15
hey leute wie kann ich alles mit Variablen ausführen ?
also hab es so versucht aber haut nich hin :
Code: Sub test()
Dim folder As String
Dim vlc As String
Dim name As String
vlc = "C:\Programme\VideoLAN\VLC\vlc.exe"
folder = "D:\Filme"
name = "Film nummer 1.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.exe """ & folder & "\" & name) 'Dieser Teil funktioniert
End Select
End Sub
Bin mit meinem Latein am Ende
Habe ich mich bei Case 1 mit den "" verhauen ?
Wie ersetze ich den unter Case 1 zu sehenden VLC Pfad durch die variable vlc ?
Das Programm soll für jeden User anwendbar sein indem man zb beim 1. Programmstart dann ersteinmal den Pfad des Filme Ordners sowie den Pfad des VLC players abfrägt aber das kommt dann noch
liebe Grüße andi
christopher.g_
Tutorial Leser
Anmeldedatum: 10.12.2007
Beiträge: 72
Verfasst am: 17.02.2009, 09:44
hi
ja ansich ist e fast alles richtig...
zum einen
wenn du den pfad für den vlcplayer eingeben lässt (wahrscheinlich am besten mit common dialog) füge schon hier das Leerzeichen ein !
Code:
vlc = "C:\Programme\VideoLAN\VLC\vlc.exe " '<---- da schon das leerzeichen
folder = "D:\Filme\" '<-- und hier schon den backslash
name = "Film nummer 1.avi" '<-- passt so
somit fallen einige zeichen weg...
Code:
Case 1
Shell (vlc & folder & name) 'und die klammern müssen weg sonst tritt der nächste fehler auf ;-)
also so
Code:
Shell vlc & folder & name 'und das funktioniert jetzt
wenn ich dir noch einen tipp geben darf...
Code:
Shell vlc & folder & name , vbNormalFocus 'hohlt den vlcplayer gleich in den vordergrund und nicht minimiert
ich hab dir den Code nochmal zusammen gefasst:
Code:
Sub Test()
Dim folder As String
Dim vlc As String
Dim name As String
vlc = "C:\Programme\VideoLAN\VLC\vlc.exe "
folder = "D:\Filme\"
name = "Film nummer 1.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.exe """ & folder & name) 'Dieser Teil funktioniert
End Select
End Sub
lg deepack
_________________
remember:
ein wahrer freund ersticht dich von vorne
*andi*
Newbie
Anmeldedatum: 02.02.2009
Beiträge: 6
Verfasst am: 17.02.2009, 12:10
vielen Dank für die schnelle und hilfreiche Antwort, jedoch hats so auf anhieb (bei case1) nicht funktioniert.
Ich habe jetzt noch etwas rumgetüftelt und wenn man deiner Lösung jetzt noch was hinzufügt, gehts einwandfrei.
Und zwar:
vlc = "C:\Programme\VideoLAN\VLC\vlc.exe """
hinten nochmal 2x ""
also Vollständig:
Code:
Sub test6()
Dim folder As String
Dim vlc As String
Dim name As String
vlc = "C:\Programme\VideoLAN\VLC\vlc.exe """
folder = "D:\Filme\"
name = "movie xvid german.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.exe """ & folder & name) 'Dieser Teil funktioniert
End Select
End Sub
_________________
christopher.g_
Tutorial Leser
Anmeldedatum: 10.12.2007
Beiträge: 72
Verfasst am: 17.02.2009, 12:23
hi ja gerne kein problem
wobei bei mir funktioniert case1 mit nur einem " auch
_________________
remember:
ein wahrer freund ersticht dich von vorne
Verwandte Themen
Aufrufe
Letzter Beitrag
Wichtig: [Video] Funktionen
3144
31.07.2010, 14:32
Wichtig: [Video] Lesson 2 - If then Else, For Schleife
2904
14.02.2008, 06:21
[Video] Chat Flooder
4552
07.04.2008, 17:12
[Video] *.dll & *.ocx Installer
2432
06.03.2008, 20:19
