Hallo,
Eine Funktion zum ersetzen der "\" mit "/" (zum Dateinamenumwandeln für SHELLCMD) gibt keinen Wert zurück wenn der String Sonderzeichen wie "\" oder "/" enthält. Es wird auch nur ein "\" in der Funktion umgewandelt, das 2. verschwindet ....
Eine Funktion zum ersetzen der "\" mit "/" (zum Dateinamenumwandeln für SHELLCMD) gibt keinen Wert zurück wenn der String Sonderzeichen wie "\" oder "/" enthält. Es wird auch nur ein "\" in der Funktion umgewandelt, das 2. verschwindet ....
Code (glbasic) Select
GLOBAL a$="Test\\//Test"
PRINT a$,10,30
PRINT KONV(a$),10,100
SHOWSCREEN
MOUSEWAIT
END
// ------------------------------------------------------------- //
// --- KONV ---
// ------------------------------------------------------------- //
FUNCTION KONV: wert1$
// Diese Variablen sind als LOCAL definiert:
// wert1$
LOCAL wert2$
FOR t=0 TO LEN(wert1$)-1
IF MID$(wert1$,t,1)="/"
wert2$=wert2$+CHR$(92)
ELSE
wert2$=wert2$+MID$(wert1$,t,1)
ENDIF
NEXT
PRINT wert2$,10,50
RETURN wert2$
ENDFUNCTION // KONV