Hallo,

ich möchte in Dateinamen die "/" in "_" ersetzen.

Leider kommt es mit folgendem Code zum Absturz:

  Dim i As integer
  dim folder, file as folderItem
  dim t As string
  folder=selectfolder
  if folder<>nil then
    start:
    for i=1 to folder.count
      file=folder.item(i)
      t=file.name
      t=replaceall(t,chr(47),"_")
      file.name=t
      goto start
    next
  end if

Danke im Voraus für jede Hilfe
Robert
RB 2006 Rel. 3


Antwort per Email an