Hi ich hab mir mit RealBasic ein Programm geschrieben.
Hab einen Ordner auf CD in dem sich ein Unterordner befindet in welchem sich wieder 2 Unterordner befinden.
Der erste Unterordner hat n Variablen namen aber den zu öffnen sollte eigentlich nicht das problem sein. Hab das (denke ich) auch schon hingekriegt.
Die beiden unterordner heissen Large und Small und zwar immer gleich.
Hab da jetzt n Programm geschrieben das ich mir die Dateien auf die Platte kopieren kann.
Code:
  Dim f,counter,i,b as Integer
  Dim origin, destination,datei,g,h as FolderItem
  origin=GetFolderitem(".\pictures\")
  destination=SelectFolder
  for i=1 to origin.count
    if origin.item(i).directory then 
      g=origin.item(i) 
      exit 
    end if 
  next
  f=g.count
  h=origin.item(f).child("Large")
  if h.exists  then
    for counter = 0 to h.count 
      datei=h.item(counter)
      datei.CopyFileTo(destination.child("Large"))
      progressBar1.maximum=h.count
      progressbar1.value=counter
    next
  end if
  if origin.item(f).child("Large").exists then
    for counter = 0 to h.count
      datei=h.item(counter)
      datei.CopyFileTo(destination.child("small"))
      ProgressBar1.maximum=h.count
      progressBar1.value=counter
    next
  end if 
  msgBox "Kopiervorgang abgeschlossen!"
Es entsteht ne Nil Exception und zwar wenn ich h den Wert zuweise. Ich weiss nicht woran es liegt meiner Meinung nach dachte ich eigentlich das das richtig ist.
Kann mir jemand helfen und mir n tipp geben was ich falsch gemacht hab?
Achtung: Dies ist ein alter Thread im HTML und Webmaster Forum
Diese Diskussion ist älter als 90 Tage. Die darin enthaltenen Informationen sind möglicherweise nicht mehr aktuell. Erstelle bitte zu deiner Frage ein neues Thema im Forum !!!!!