Sostituzione caratteri

[BlackDog]

Ho una variabile che può essere con dati o vuota, io vorrei che, se quest'ultima è vuota, venga sostituito il valore con un punto (.)

Il campo è in un database Access ed è di tipo testo
ho fatto questa funzione, ma nn va..

FUNCTION fixNull( theString )
fixNull = REPLACE( theString, "", "." )
END FUNCTION

[Daisyland]

Non è che la variabile è un campo NULL ?
Nel caso

If IsNull(theString) Then
     theString = "."
End If

[BlackDog]

adesso provo...

[BlackDog]

no dunque..
la variabile la recupero da un form (variabile = TRIM(Request(variabile")) e quindi ho bisogno di utilizzare la FUNCTION Replace, xè devo piazzarla nella stringa SQL quando aggiungo il record al Database

....
...
fixNull(variabile)
...
Conn.Execute, SQL

[Daisyland]

If Len(variabile) = 0 Then
 variabile = "."
End If

[BlackDog]

sì così è ovvio che funziona, ma io nn voglio usare "if...then...end if", ma solo la FUNCTION xè è più semplice da gestire..

[BlackDog]

non per altro...ho circa una trentina di campi da riempire e fare una routine per ognuno....

[optime]

nerocane, metti la if dentro la function...

[santino83]

metti tutte le variabili in un array e poi le controlli con un for...next

mioarray=array(request("var1),request("var2"),...,request("varn"))

edit: ubi maior minor cessat...quoto optime

[Daisyland]

Originariamente inviato da BlackDog
non per altro...ho circa una trentina di campi da riempire e fare una routine per ognuno....

scusa, ma come ti han già detto, dentro la funzione ci va del codice (prima mettevi il replace).
mettici il controllo sulla lunghezza che ho scritto, se ha lunghezza zero fai la sostituzione al posto del replace. Il problema del replace è che gli serve un carattere da sostituire, se la stringa è vuota non può sostituire nulla.