[Gambas-user] Please help with directory problem

[M0E Lnx]

You could try defining a integer variable to keep track of your array

Here is your code with a slight modification... not tested... but try it

PUBLIC SUB Button2_Click()

DIM sHak AS String
DIM haks AS NEW String[300]
DIM hak2 AS String
DIM crtdir AS String
DIM i as Integer

sHak = "/home/kari/ulkoiset/sdi1/debian_src/
ftp.fi.debian.org/debian/pool/main/g/gimp/"
crtdir = "/home/kari/backup_work/cdroot/"

 haks = Split(sHak, "/")

' FOR EACH hak2 IN haks
FOR i = 0 to Haks.Count - 1

'   crtdir = crtdir &/ hak2
crtdir = crtdir &/ haks[i]
   PRINT crtdir
   SHELL "mkdir  " & crtdir
   'PRINT hak2
   'PRINT crtdir
 NEXT
END


See if that works


On Thu, Oct 30, 2008 at 3:24 PM, Kari Laine <klaine8 at ...626...> wrote:
> Hi All,
>
> still making my homebrew backup-program. Now I have tried to get a simple
> thing to work for something like 5 hours. Following is a test routine which
> does not work. It's idea is to create directory structure given in variable
> SHak inside directory given by variable crtdir. Any ideas why it does not
> work? I remember seeing something in help about directories in Gambas but I
> think that should not affect absolute paths...
>
>
>
> PUBLIC SUB Button2_Click()
>
>
> DIM sHak AS String
> DIM haks AS NEW String[300]
> DIM hak2 AS String
> DIM crtdir AS String
> sHak = "/home/kari/ulkoiset/sdi1/debian_src/
> ftp.fi.debian.org/debian/pool/main/g/gimp/"
> crtdir = "/home/kari/backup_work/cdroot/"
>  haks = Split(sHak, "/")
>  FOR EACH hak2 IN haks
>
>
>    crtdir = crtdir &/ hak2
>    PRINT crtdir
>    SHELL "mkdir  " & crtdir
>    'PRINT hak2
>    'PRINT crtdir
>  NEXT
> END
>
>
>
> Best Regards
> Kari Laine
> -------------------------------------------------------------------------
> This SF.Net email is sponsored by the Moblin Your Move Developer's challenge
> Build the coolest Linux based applications with Moblin SDK & win great prizes
> Grand prize is a trip for two to an Open Source event anywhere in the world
> http://moblin-contest.org/redirect.php?banner_id=100&url=/
> _______________________________________________
> Gambas-user mailing list
> Gambas-user at lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/gambas-user
>