23/02/2006, 07:02
|
| | | Fecha de Ingreso: noviembre-2004
Mensajes: 371
Antigüedad: 20 años, 6 meses Puntos: 0 | |
| algo un poco mas simple podria ser
if Request.Form("FCH_INICIO")<>"" then
Dfec_fi=mid(trim(request.Form("FCH_INICIO")),1,2)
m=mid(trim(request.Form("FCH_INICIO")),4,10)
Mfec_fi=mid(m,1,2)
Afec_fi=mid(trim(request.Form("FCH_INICIO")),7,10)
strFCH= Afec_fi& right("0"&Mfec_fi,2)& right("0"&Dfec_fi,2)
end if
e imprimes o guardas strFCH |