用两种不同的方法来求实现数字字符串的最大，最小和平均值 dblHighestSoFar or IsNull(dblHighestSoFar) Then dblHighestSoFar = CDbl(someNumbers(I)) End If End If Next Max = dblHighestSoFar End Function Function Avg(someNumbers) dblHighestSoFar ...
当前位置： 首页 >
奇风发布的所有文章
检测表单输入EMAIL的合法性
[code] function IsValidEmail(email) dim names, name, i, c “Check for valid syntax in an email address. IsValidEmail = true names = Split(email, "@") if UBound(names) 1 then IsValidEmail = false exit function end if for ...
计算文件下载时间
[code] = 3600 Then intHours = Int(TimeInSeconds / 3600) Mod 24 If TimeInSeconds >= 60 Then intMinutes = Int(TimeInSeconds / 60) Mod 60 If TimeInSeconds >= 0 Then intSeconds = Int(TimeInSeconds) Mod 60 If intYears 0 Then If i ...
aspemail组件的应用
[code] sub sendMail(a_intID , a_strEmail) const c_strMailServer = "smtp.163.net" dim objConn,objRs,strSql dim strContent,strBody,strSubject,objEmail strBody = "" strBody = strBod ...
使用ASP重启服务器
大家知道直接使用ASP是不能够重启服务器的，这时我们需要制作一个组件来实现功能，ASP通过这个组件调用系统API，然后按照不同的重启和关机方式进行操作！ 下面先说COM的制作，在VB中新建一工程，当然是AceiveX dll的！ 1）先修改工程属性，在工程属性窗口将工程名称改为system，在类模块 ...
用纯ＡＳＰ代码实现图片上传
用ＡＳＰ编写网站应用程序时间长了，难免会遇到各式各样的问题，其中 关于如何上传文件到服务器恐怕是遇见最多的问题了，尤其是上传图片，比如 你想要在自己的社区里面实现类似网易虚拟社区提供的“每日一星”的功能， 就要提供给网友上传照片的功能。上传图片文件到服务器可以使用各种免 ...
保护ASP脚本源代码
ASP是基于 Server端的脚本运行环境，它简单易用，不需要编译和连接，脚本可以在 Server端直接运行，并且它支持多用户、多线程，在 Web开发中得到了广泛的应用。 但是，因为 ASP脚本是纯文本格式，所以恶意者通过源代码可以很容易地看到原本不该看到的页面内容。例如， ASP源代码中通常有 ...
asp程序权限控制的代码
[code] '重要代码，将这些代码拷贝到代码配置文件中。（代码配置文件就是一个普通的asp文件，所有的公共代码都放到这 '个文件中，其他需要调用公共代码的就通过include将这个文件包含进去。 ' '权限验证代码 'RightString：权限串（用户的所有权限连接成的串，用都 ...
