09 2008 档案

摘要：function getFileExtName(fileName) dim pos pos=instrrev(filename,".") if pos>0 then getFileExtName=mid(fileName,pos+1) else getFileExtName="" end ifen... 阅读全文

摘要：'***************************************************'函数名：IsObjInstalled'作 用：检查组件是否已经安装'参 数：strClassString ----组件名'返回值：True ----已经安装' False ----没有安装'**... 阅读全文

摘要：'================================================'函数名：FormatDate'作 用：格式化日期'参 数：DateAndTime ----原日期和时间' para ----日期格式' 用法：再ASP中：=FormatDate(rs("pubdate... 阅读全文

摘要：'================================================'函数名：Alert'作 用：弹出对话框'参 数：Alert----弹出对话框' str ----文本' 用法：Alert"添加成功！"'返回值：真'==========================... 阅读全文