Escribe esto:
 
antes del HTML   
Código:
 <SCRIPT RUNAT=SERVER LANGUAGE=VBSCRIPT>					
function DoDateTime(str, nNamedFormat, nLCID)				
	dim strRet								
	dim nOldLCID								
										
	strRet = str								
	If (nLCID > -1) Then							
		oldLCID = Session.LCID						
	End If									
										
	On Error Resume Next							
										
	If (nLCID > -1) Then							
		Session.LCID = nLCID						
	End If									
										
	If ((nLCID < 0) Or (Session.LCID = nLCID)) Then				
		strRet = FormatDateTime(str, nNamedFormat)			
	End If									
										
	If (nLCID > -1) Then							
		Session.LCID = oldLCID						
	End If									
										
	DoDateTime = strRet							
End Function									
</SCRIPT>
  y formatea el texto asi:  
Código:
  <%= DoDateTime((Recordset1.Fields.Item("Fecha").Value), 2, 2070) %>
  Espero te sirva 
saludos y suerte     
<img src="http://www.velazquez.com.mx/masteraspx/firma.jpg" width="465" height="79" border="0" usemap="#URL"> 
<map name="URL"> 
  <area shape="rect" coords="270,48,347,61" href="http://www.masteraspx.tk" target="_blank">
</map>