露露专栏

=========添加--所有分类物资===========~~~~ split数据库名称分割函数 Dim arrSn,arrSq,arrSql arrSn = "校长/副校长/主任/副主任/班导师/副班导师/班长/副班长/组长/副组长/小组长/副小组长/三好学生/优秀团员" arrSql = Split(arrSn,"/") split分割路径名称函数 Dim arrName,arrHtm

{ASP}从Excel导入到Access中 dim conn2        定义第二个连接变量On Error Resume NextServer.ScriptTimeOut = 999999       超时时间set conn=CreateObject("ADODB.Connection")conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;

 轻松地实现了防止用户刷新多次提交表单和使用后退钮重复多次提交表单。     表单文件formtest.asp       Randomize   初始代随机数种子     num1=rnd()   产生随机数num1     num1=int(26*num1)+65   修改num1的范围以使其是A-Z范围的Ascii码，以防表单名出错     session("antry")="te

有两种主要的文件处理类型：  　　创建、添加或删除数据，以及读取文件  　　移动、复制和删除文件  　　创建文件 　　创建空文本文件（有时被叫做“文本流”）有三种方法。 　　第一种方法是用 CreateTextFile 方法。 下

查看空间是否支持FSO Function IsObjInstalled(strClassString)  On Error Resume Next  IsObjInstalled = False  Err = 0  Dim xTestObj  Set xTestObj