RM/ramgenerator (realmedia) in VB

[S-Cript]

Hi,

ik zit met het volgende probleem,
ik heb een ram generator gemaakt in vb,
deze doet niets anders dan een " volledig path van de rm.file"
in een text file plaatsen en deze dan wegschrijven als .ram

nu moet de titel nog handmatig worden ingevuld,en wil ik hem automatisch maken..
als hij kijkt naar de folder en de rm-files die erin staan.
vervolgens maakt hij de ram files aan voor deze files..

nu zit ik te denken over wat de makkelijkste manier is om de info uit de folder in te lezen en dan te laten bewerken..

maar it leaves me blank...

anybody has a idea??

[S-Cript]

klein ideetje: misschien dat iemand dit kan bevestigen...


de files naar een txtfile laten schrijven....
vervolgens deze file in een
while not eof de ram's laten generen...

1 question is nu hoe krijg ik de filelist in een txtfile?

[Xiphalon]

shell("dir *.rm > data.txt")

[S-Cript]

Thanx...

een kleintje nog...

hoe kan je alleen de namen laten wegschrijven ipv
de totale listing, met alle extra's erop en eraan....

[_Squatt_]

Op maandag 29 oktober 2001 11:22 schreef darkmage het volgende:
shell("dir /b *.rm > data.txt")

nu geeft dir alleen maar de bestandsnamen.

[Xiphalon]

Oeps dacht even niet na...

[S-Cript]

Merci 2 all of you...

[S-Cript]

jammer genoeg blijkt shell("dir /b *.rm > data.txt")

ook niet te werken...
ik krijg nu een file not found error
ik heb het ook geprobeerd dmv
ChDrive ("d")
ChDir ("\folder1")
Shell ("c:\windows\command.com dir *.rm > data.txt")

of zonder de command.com
ook het volledige path in de shell wilt niet werken..
het blijft de file not found error ( op de dir regel)
zelfs zonder extensie dus alleen "dir" geeft dezelfde foutmelding

met command.com komt de volgende error
"de zoekmap die voor command.com is opgegeven is onjuist
er zijn teveel parameters
er zijn teveel parameters
er zijn teveel parameters"


any more ideas??

[Lister]

Het probleem met het shell commando komt volgens mij doordat DIR een ingebouwd DOS commando is in tegenstelling tot bijv XCOPY wat een programma (XCOPY.EXE) is. Ik weet ff niet hoe je dat kan oplossen, maar in VB is de volgende code misschien handiger.
Deze code print alle *.rm files in C:\ naar het debugscherm

code:

Public Sub Test()

    Dim strFile As String

    ' zoek de eerste file op
    strFile = Dir("c:\*.rm")

    Do While strFile <> ""
      ' doe iets met de file
      Debug.Print strFile

      ' zoek de volgende file op
      strFile = Dir()
    Loop
    
End Sub