filename in text file

[Kyme]

it's some chance to make one script to read files from one folder whit videos and make one .txt and add there all videos name???

[porthos]

it's some chance to make one script to read files from one folder whit videos and make one .txt and add there all videos name???

This may be a little simplistic but you can get a list of all files in a folder by running dir *.* >list.txt in a command prompt. That would get the file name of the files but not the "name" of the video itself.

P

[Kyme]

This may be a little simplistic but you can get a list of all files in a folder by running dir *.* >list.txt in a command prompt. That would get the file name of the files but not the "name" of the video itself.

P

wow....i don't know how to use cmd in autoit....then i choise little simpe way....i forgot this one^^

[Kyme]

wow....i don't know how to use cmd in autoit....then i choise little simpe way....i forgot this one^^

$title = "Select files"

$file = FileOpen(@ScriptDir & "\aaa.txt", 1)

$var = FileOpenDialog($title, @WindowsDir & "", "All (*.*)" , 1 + 4 )

If @error Then

MsgBox(4096,"","No File(s) chosen")

Else

$var = StringReplace($var, "|", @CRLF)

FileWrite($file, $var)

EndIf

but i wanna make only for files name...he write me directory too:|

some ideea how to fix this???

tnx

Edited September 2, 2008 by Kyme

[Kyme]

can someone please help me whit this...

i wanna write the file name whit out extension.....how the f. to do it?????

$message = "Hold down Ctrl or Shift to choose multiple files."
$file = FileOpen(@ScriptDir & "\aaa.txt", 1)
$var = FileOpenDialog($message, @WindowsDir & "", "All (*.*)" , 1 + 4 )

If @error Then
    MsgBox(4096,"","No File(s) chosen")
Else
    $var = StringReplace($var, "|", @CRLF)
    $var = StringReplace($var, @WorkingDir, "Folder="&@WorkingDir&@CRLF)
    FileWrite($file, $var)

EndIf

[cyanidemonkey]

try this:

$message = "Hold down Ctrl or Shift to choose multiple files."
$file = FileOpen(@ScriptDir & "\aaa.txt", 1)
$var = FileOpenDialog($message, @WindowsDir & "", "All (*.*)" , 1 + 4 )

If @error Then
    MsgBox(4096,"","No File(s) chosen")
Else    
    $vids = StringSplit($var, "|")  
    FOR $i = 0 to UBound($vids)-1
        FileWriteLine($file, StringTrimRight($vids[$i],4))
    NEXT
EndIf

Edited September 3, 2008 by cyanidemonkey