bestand met spaties in de naam opend elke spatie apart

Status
Niet open voor verdere reacties.

Barry_127

Gebruiker
Lid geworden
20 jan 2003
Berichten
478
waarbij Text3.Text dit is:
E:\00001 SlipKnoT - Eeyore.mp3

dan opent hij in winamp deze locaties:
E:\00001
C:\Program Files\Microsoft Visual Studio\VB98\SlipKnoT
C:\Program Files\Microsoft Visual Studio\VB98\-
C:\Program Files\Microsoft Visual Studio\VB98\Eeyore.mp3

terwijl hij alleen dat ene bestand moet openen

wat is er fout???

PHP:
Private Sub Command2_Click()
   Shell ("C:\\Program Files\\Winamp2\\winamp.exe " & Text3.Text)
End Sub
 
nee want hier is de MP3 locatie een constante en bij mij is het een variabele en dat moet ook want hij haalt de locatie uit de Database

/edit: en hij heeft geen spaties in de file name daar
 
Hallo Barry_127,De string waarde van Text3.text moet eerst aan een variabele worden toegekend.
Bijvoorbeeld: mp3_bestand = Text3.text
Het is ook beter om de variabele te trimmen, het ontdoen van eventuele ongewenste voor-en naloopsapties in dat bestandsnaam. Je kunt immers per abuis spaties vóór en/of achter het bestandsnaam te hebben geplaatst.

Uiteindelijk moet de code zo gaan eruit zien:

Code:
Private Sub Command2_Click()
   Dim mp3_bestand As String
   Dim Ret As Integer
   Dim PadNaam As String
   mp3_bestand = Trim(Text3.text)
   PadNaam = "C:\Program Files\Winamp2\winamp.exe " & mp3_bestand
   Ret = Shell(PadNaam)
   ......
   ......
   ......
End Sub

Hoop, dat het werkt. Heb zelf nog niet getest(wat ik normaliter juist eerst doe, alvorens het hier te plaatsen), maar laat het me dan even weten als het niet werkt.

Dennis.

p.s. ff aangepast, ik typ niet zo goed namelijk.
 
Laatst bewerkt:
Geplaatst door Barry_127
het werkt helaas niet :(
Ja, ik ben niet zo thuis met die mp3 bestanden. Heb die bestanden op mijn pc niet staan. Ik kijk morgen verder wel.

Dennis.

P.S. Ben wel altijd pas laat thuis.
 
bedankt voor de hulp

en dat je laa tthuis bent geeft niet ben al blij dat je probeert te helpen :D
 
Toch aardig gezegd van jou.

Ik weet ook niet alles hoor, maar doe wel mijn best.

Dennis.
 
heb het gevonden na nog meer proberen :D

dit is de goede code:
Code:
   Dim mp3_bestand As String
   Dim ret As Integer
   Dim pad As String
   mp3_bestand = Trim(Text3.Text)
   pad = "C:\Program Files\Winamp2\winamp.exe """ & mp3_bestand & """"
   ret = Shell(pad)
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan