新建代码到data_s.asp文件
<html><head><meta http-equiv="Content-Language" content="zh-cn"><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title>数据库管理</title></head><body><div align=center>数据库管理系统</div><br><br><p align="center"><%Dim ZC_DATABASE_PATH'数据库的路径ZC_DATABASE_PATH="database/data.mdb"data_array= Split(ZC_DATABASE_PATH,"/")Dim actionaction=trim(request("action"))Dim dbpath,bkfolder,bkdbname,fso,fso1Select Case actionCase ""Call chushihua()Case "CompressData" '压缩数据Dim tmpr