FormatDateTime error in MysQL

[janetopps]

This is an asp page which adds a template to a mysql database. it returns this error




Microsoft VBScript runtime error '800a000d'

Type mismatch: 'FormatDateTime '

/temps.asp, line 111

and the code in line 111 is

<td align="center" title="Created on <%=FormatDateTime(sDATE,1)%>"><%=sDATE%></td>

more code from the page concerened

SQL = "SELECT ID, fldNAME, fldDATE FROM nm_tbl_template ORDER BY " & ORD
    Call OPEN_DB()
    Set RS = Server.CreateObject("ADODB.Recordset")
    RS.LockType   = 1
    RS.CursorType = 0
    RS.Open SQL, MyConn	
    	IF NOT RS.EOF THEN
    		strRETURNED_DATA = RS.getrows
    	ELSE
    		EOF_VAL = True
    	END IF	
    RS.close
    Set RS = Nothing
    MyConn.close			
    Set MyConn = Nothing    
    
    IF Not EOF_VAL = True Then
    	intNUM_COL=ubound(strRETURNED_DATA,1)
    	intNUM_ROW=ubound(strRETURNED_DATA,2)
    	FOR intROW_COUNTER = 0 TO intNUM_ROW
    		ID     = strRETURNED_DATA(0,intROW_COUNTER)
            NAME   = strRETURNED_DATA(1,intROW_COUNTER)
            sDATE  = strRETURNED_DATA(2,intROW_COUNTER)
            %>
			<tr onMouseOver="bgColor='WhiteSmoke'" onMouseOut="bgColor='White'">
				<td align="Center" width="30">
					<table cellpadding="2" cellspacing="0" border="0" width="30">
						<tr>
							<td><% IF Trim(arrLEVEL(17)) = "1" THEN %><a href='template_edit.asp?ID=<%=ID%>'><img src="Images/ico_edit.gif" width="15" height="15" alt="Edit Template" border="0"></a><%Else%>&nbsp;<%End If%></td>
                            <td><% IF Trim(arrLEVEL(18)) = "1" THEN %><%IF IsMSIE = True THEN%><a style="cursor:pointer;cursor:hand;" onclick="DeleteTemplate('<%= ID %>','<%= FIX_JS_STR(NAME) %>')"><%Else%><a href='template_del.asp?ID=<%=ID%>'><%End If%><img name="image<%=ID%>" src="Images/ico_del.gif" width="15" height="15" alt="Delete" border="0" onMouseOver="image<%=ID%>.src='Images/ico_del_on.gif';" onMouseOut="image<%=ID%>.src='Images/ico_del.gif';" /></a><% Else%>&nbsp;<% End If %></td>
						</tr>
					</table>
				</td>
				<td width="39" align="Center"><%=ID%></td>
				<td style="cursor:pointer;cursor:hand;" onClick="window.location='template_view.asp?ID=<%=ID%>'"><%=NAME%></td>
				<td align="center" title="Created on <%=FormatDateTime(sDATE,1)%>"><%=sDATE%></td>
                <td width="15"><a href="news_add.asp?TID=<%=ID%>"><img src="images/template.gif" width="15" height="15" alt="Apply Template" border="0"></a></td>
                <td width="15"><a href='template_view.asp?ID=<%=ID%>'><img src="images/view_zoom.gif" width="15" height="15" alt="Preview Template" border="0"></a></td>
			</tr>            
            <%
    	NEXT
    ELSE
        %>    
        <tr><td colspan="4">No template has been found.</td></tr>
        <%
    END IF       
    %>

can anyone tell offhand what is wrong with the particular line or code? or what i could try to get rid of the error?

[janetopps]

ive got the solution now,

<%
     dt = strRETURNED_DATA(2,intROW_COUNTER)
     If IsDate(dt) Then 
         dt = FormatDateTime(CDate(dt))
     Else
         dt = "N/A" ' or whatever
     End If
%>
<td align="center" title="Created on <%=dt%>"><%=dt%></td>
...