Problemas Com Replace

[ju_rezende]

Olá pessoal estou aqui com mais um problema, estou precisando usar o campo data e hora, mas preciso, antes de gravar no banco trocar as barras por traços, e não estou conseguindo usar o replace, será que alguém poderia me dar uma ajuda.

Desde já grata pela atenão

Vou deixar meu cod aqui.

horar1=timeValue(now)

response.write replace(hora1):,-)

data1=replace(date),"/","-")

response.write ("data" & data1 & "<br>hora " & hora1 &)

response.end

Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

mySmartUpload.AllowedFilesList = "jpg,"

mySmartUpload.Upload

dim contador

contador=1

For each file In mySmartUpload.Files

If not file.IsMissing Then

icount=file.SaveAs("../foto1/fotos" & contador & ".jpg")

arqfile = "../fotos/fotos" & contador & ".jpg"

End If

contador=contador+1

Next

[kuroi]

seria isso?

data1=replace(date,"/","-")

[ju_rezende]

brigada amigo