generaltools.asp

来自「教师教学质量评价系统 教师教学质量评价系统 asp 源代码」· ASP 代码 · 共 19 行

<%


sub showMsg(strItem)
	response.write "<div ailgn='center'>"
	response.write "<table border='0' width='100%' height='75'cellspacing=0 cellpadding=0>"
	response.write "<tr>"
	response.write "<td align='center' valign='center'>"
	response.write "<font size=3 color=#FF0000>"
	response.Write strItem
	response.write "<a href='javaScript:history.back()'>&lt;&lt;"
	response.write "返回</a>"
	response.write "</font>"
	response.write "</td></tr></table>"
	response.write "</div>"
	closeDB
	response.end
end sub
%>