Avatar billede x-party Nybegynder
04. februar 2004 - 12:59 Der er 10 kommentarer og
1 løsning

omdøb filnavn numerisk efter oprettelse dato

Hej,

Jeg har en pokkers masse billeder, som jeg gerne vil have omdøbt til fx 001 og opefter. Det skal være sådan at programmet selv omdøber dem, og den skal gøre det efter oprettelse dato og tid...

Findes såadn et program?
Avatar billede sukos Juniormester
04. februar 2004 - 13:00 #1
Kan du afvikle PHP?
Avatar billede x-party Nybegynder
04. februar 2004 - 13:02 #2
ja
Avatar billede dk_akj Nybegynder
04. februar 2004 - 13:06 #3
Her er en vbs fil du måske kan bruge.

ssFDESKTOP = &H0 
ssFFLAGS  = &H1               
ssFTEXT    = "Omdøb filer i folder"

sSelectedPath = SelectFolder (ssFDESKTOP, ssFTEXT, ssFFLAGS)
If Len(sSelectedPath)=0 Then
    Wscript.quit
Else
    set fso=createobject("scripting.filesystemobject")
    thisfolder=sSelectedPath

i = inputbox("Første fil skal hedde")
if not isnumeric(i) then
    msgbox("Du skal indtaste et tal !!")
    Wscript.quit
end if

        for each f in fso.getfolder(thisfolder).files
            f.name = i & ".jpg"
            i = i + 1

        next

end if

Function SelectFolder(ssFROOT, ssFASK, ssFFLAGS)
  Set oSHA = CreateObject("Shell.Application")
  Set oSF = oSHA.BrowseForFolder(0,ssFASK,ssFFLAGS,ssFROOT)
  If Instr(TypeName(oSF),"Folder")<> 1 Then Exit Function
  For Each oItem in oSF.ParentFolder.Items
    If oItem.Name = oSF.title Then
      SelectFolder = oItem.path
      Exit Function
    End If
Next
SelectFolder = oSF.title
End Function


//akj
Avatar billede x-party Nybegynder
04. februar 2004 - 13:09 #4
akj,

Jeg ved ikke helt hvad jeg skal gøre med denne vbs, kan jeg få en lille manual? ;-)
Avatar billede x-party Nybegynder
04. februar 2004 - 13:22 #5
Hej Jeg har fået den til at virke, men det er bare et lille problem, den sætter ikke 0'er foran, så de kommer ikke til at stå i rækkefølge når jeg stiller dem op.
Den kan desværre heller ikke tage undermapper :(
Avatar billede dk_akj Nybegynder
04. februar 2004 - 13:29 #6
0'erne er let at lave subfolders kan også lade sig gøre men jeg har desværre ikke tid lige nu.

//akj
Avatar billede x-party Nybegynder
04. februar 2004 - 13:32 #7
okay, hvis du skulle få tid så må du jo endelig vende tilbage ;-)
Avatar billede sukos Juniormester
04. februar 2004 - 14:00 #8
Her er osse lidt, men:

tager ikke højde for oprettelsesdato
Og tager osse kun et dir, har lige prøvet at rode med flere dirs at vælge imellem, men får det ikke til at virke lige nu, og jeg skal ud af døren nu!

<html><head><title>Rename filer i et dir</title>
</head>
<body>
<?php
if(isset($_GET["renamedir"])) {

    if(is_dir($_SERVER["DOCUMENT_ROOT"] ."/". $_GET["renamedir"])) {

$files = array();
$sti = $_SERVER["DOCUMENT_ROOT"] ."/". $_GET["renamedir"];

$path = opendir($sti);
while (false !== ($filer = readdir($path))) {
if($filer == "." || $filer == ".." || is_dir($sti ."/". $filer)) {
continue;
}
$files[] = $filer;
    }
closedir($path);
?>
<table><tr>
    <td><b>Gammelt navn:</b><?php
for($i = 0; $i < count($files); $i++) {
echo"<br>\n". $files[$i];
    }
?></td>
    <td><b>Nyt navn:</b><?php

for($i = 0; $i < count($files); $i++) {
$filnavn = pathinfo($files[$i]);
$ext = $filnavn["extension"];
$newname = "0". ($i+1) .".". $ext;
rename($sti ."/". $files[$i], $sti ."/". $newname);
echo"<br>\n". $newname;

    }

?></td>
</tr></table>
<?php
}else{
echo"Dir'et ". $_GET["renamedir"] ." findes ikke!";
    }
}

echo"<p>";

echo"<a href=\"". $_SERVER["PHP_SELF"] ."?renamedir=renames\">Omdøb filer i renames</a>";
?>
Avatar billede x-party Nybegynder
09. februar 2004 - 12:28 #9
fik desværre ikke det jeg søgte
Avatar billede x-party Nybegynder
23. februar 2004 - 02:46 #10
Hej dk_akj,

jeg har forsøgt, at få lavet det script, som jeg skal bruge det, men ingen har kunnet hjælpe mig :(
Så derfor håber jeg du har tid, til at hjælpe mig. Jeg vil gerne give lidt penge for det, da det vil hjælpe mig meget at få lavet sådan et script.

det skal være sådan, at der altid er tre decimaler, så når billede nr. 1 skal navngives kommer den til at hedde 001 etc. Den skal også tage subdirs med. Jeg håber virkelig du har tid til at hjælpe
Avatar billede dk_akj Nybegynder
23. februar 2004 - 09:32 #11
Tag lige fat i mig via MSN messenger dk_akj@hotmail.com

//akj
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester