**求助**编译器错误消息: BC30451
<html><%
dim sngC,sngF as single
sngC=CSng(request("C"))
sngF=CtoF(sngC)
response.write("摄氏温度为:" & Cstr(sngC) & "<br>")
response.write("转换后为:" & Cstr(sngF) & "<br>")
%>
<script language="VB" runant="server">
function CtoF(sngC as single)
dim sngTempF as single
sngTempF=(sngTC*9/5)+32
return sngTempF
end function
</script>
</html>
上面是我的源程序
以下是出错信息
“/study”应用程序中的服务器错误。
--------------------------------------------------------------------------------
编译错误
说明: 在编译向该请求提供服务所需资源的过程中出现错误。请检查下列特定错误详细信息并适当地修改源代码。
编译器错误消息: BC30451: 未声明名称“CtoF”。
源错误:
行 3: dim sngC,sngF as single
行 4: sngC=CSng(request("C"))
行 5: sngF=CtoF(sngC)
行 6: response.write("摄氏温度为:" & Cstr(sngC) & "<br>")
行 7: response.write("转换后为:" & Cstr(sngF) & "<br>")
源文件: D:\aspstudy\function.aspx 行: 5
请高手指点一下该怎么做呢?