convert data to currency

Try the following:
If Request.Form("price") = "" Then
strSQL = strSQL & "CCur(0),"
Else
strSQL = strSQL & ccur(Request.Form("price")) & ","
End If