代码编写完成 2004-08-27

所有代码编写完成，与其功能除服务器段rar打包外其他均已实现:)

下一步制作帮助文档，撰写系统说明。

news_list.asp设计

IF request("class_id") <> "" Then
 该类型信息列表
 strOnError = "尚无信息"
Else
 If request("searchtype") <> "" Then
  按条件搜索
  strOnError = "对不起，没有搜索到符合您要求的信息。"
 Else
  所有信息列表
  strOnError = "尚无信息"
 End If
End If

除错代码

<SCRIPT LANGUAGE="JavaScript">
<!-- Hide
function killErrors() {
return true;
}
window.onerror = killErrors;
// -->
</SCRIPT>