' VB Script Document
Function confirmDel()
	dim ReturnValue
	ReturnValue=false
	if msgbox("删除后将不能再恢复，你确定要删除吗？",vbQuestion+vbYesNo,"提示")=vbYes then
		ReturnValue=true
	end if
	confirmDel=ReturnValue
end function