repairdb.asp

来自「学生档案与成绩管理(1)学生档案管理:记录每个学生的档案信息」· ASP 代码 · 共 26 行

ASP
26
字号
<!-- #include file = "../include/function.asp" -->
<%CheckUser()%>
<HTML>
<HEAD>
</HEAD>
<BODY LANGUAGE=javascript onload="return window_onload()">
<%
	dim WExcel
	set WExcel=server.CreateObject("WExcel.Sheet")

	dim Ret,Desc
	Ret=WExcel.RepairDB
	if Ret>0 then
		if Ret=2 then
			Desc="No need to Repair."
		else
			Desc="RepairDB Failure."
		end if
	else
		Desc="RepairDB Finished."
	end if
%>
	<%=Desc%>
</BODY>
</HTML>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?