搜索列表
-
如何将长的标题用省略号收尾
【ASP编程】从数据库中提取长长的文章，总是有碍网页的排版布局。 所以，想固定地提取一部分字符，然后后面有……替代。 1，原理： 判断文章的长度是否超过规定的长度，若超过则只显示规定长度的大学，否则完整显示。 2，涉及函数： len()：返回字符串长度或者变量的字节长度。 cnbruce="my name is cnbruce" len_cn=len(cnbruce) alert(...
如何将长的标题用省略号收尾 -
ASP常用函数收藏乱七八糟未整理版
【ASP编程】<% '******************************************************************* '取得IP地址 '******************************************************************* Function Userip() Dim GetClientIP '如果客户端用了代理服务器，则应该用S...
ASP常用函数收藏乱七八糟未整理版 -
让 Asp 与 XML 交互
【XML/RSS】XML 是标准扩展语言，是 未来Web编程的标准,asp 是现在广为流传的web编程语言之一,能不能让他们 两个联合起来发挥作用呢？豆腐 在 这里 给大家 提供一个 很简单的 例子 关于XML 和 XSL 限于篇幅和知识水平 豆腐就不在这里 献丑...
让Asp与XML交互 -
ASP编程入门进阶（六）：Cookies讲座
【ASP编程】什么是 Cookie？Cookie 其实是一个标签，经常可能听到的中文翻译：小舔饼。当你访问一个需要唯一标识你的站址的 WEB 站点时，它会在你的硬盘上留下一个标记，下一次你访问同一个站点时，站点的页面会查找这个标记。每个 WEB 站点都有自己的标记，标记的内容可以随时读取，但只能由该站点的页面完成。每个站点的Cookie与...
ASP编程入门进阶（六）：Cookies讲座 -
用asp实现无组件生成验证码的方法2种
【ASP编程】无组件生成验证码-GIF格式 复制代码 代码如下:<% Option Explicit ' 显示声明 Class Com_GifCode_Class ''''''''''''''''''''''''''''''''''''''''''''' ' Author: Layen support@ssaw.net 84815733(QQ) ' Thanks: Laomi, Laomia...
用asp实现无组件生成验证码的方法2种 -
ASP编程入门进阶（三）：接触脚本程序
【ASP编程】有了前面的html中关于form的强化知识，是不是在想，下面就可以开始ASP之旅呢？未必。一般系统学过ASP的编程人员都会切身体会到：在系统学习ASP的内置对象和内置组件之前，学会脚本语言永远是至关重要的。为什么这么说呢？为什么要学脚本语言呢？ASP和脚本语言又有什么关系呢？首先说说ASP是贵为何物吧。ASP...
ASP编程入门进阶（三）：接触脚本程序 -
一些值得一看的代码asp
【ASP编程】Asp中对ip进行过滤限制函数 <% '获取访问者的地址 ip=Request.ServerVariables("REMOTE_ADDR") '允许的IP地址段为10.0.0.0～10.68.63.255 allowip1="10.0.0.0" allowip2="10.68.10.71" response.write checkip(ip,allowip1,allowip2) function checkip(ip,allowip1,allowip2) dim&nbs...
一些值得一看的代码 -
怎样给文件加密最安全？
【编程10000问】<%@ Language = VBScript%><%Response.Expires = 0p = "abcdefg"Set TestPWD = New CPassWordTestPWD.EnPWD pTestPWD.UnPWD TestPWD.ShowPWD(True)k = TestPWD.ShowPWD(True)l = TestPWD.ShowPWD(False)Set TestPWD = NothingWith Resp...
|怎样|样给|给文|文件|件加|加密|密最|最安|安全|全？|？| -
如何判断电子邮件的地址格式是否正确？
【编程10000问】第一种办法：<% Function IsValidEmail(Email) ValidFlag = False If (Email <> "") And (InStr(1, Email, "@") > 0) And (InStr(1, Email, ".") > 0) Then atCount = 0 SpecialFlag = False For atLoop = 1 To Len(Email) atChr = Mid(Email, atLoop, 1) If atChr ...
|如何|何判|判断|断电|电子|子邮|邮件|件的|的地|地址|址格|格式|式是|是否|否正|正确|确？|？| -
如何判断URL格式是否符合规范？
【编程10000问】<% function checkisUrl(tmpString) dim c,i checkisUrl = true tmpString=Lcase(trim(tmpString)) if left(tmpString,7)<>"http://" then tmpString="http://"&tmpString &n...
|如何|何判|判断|断U|UR|RL|L格|格式|式是|是否|否符|符合|合规|规范|范？|？| -
如何判断电子邮件的地址格式是否正确？
【编程10000问】第一种办法：<% Function IsValidEmail(Email) ValidFlag = False If (Email <> "") And (InStr(1, Email, "@") > 0) And (InStr(1, Email, ".") > 0) Then atCount = 0 SpecialFlag = False For atLoop = 1 To Len(Email) atChr = Mid(Email, atLoop, 1) If atChr ...
|如何|何判|判断|断电|电子|子邮|邮件|件的|的地|地址|址格|格式|式是|是否|否正|正确|确？|？| -
如何判断URL格式是否符合规范？
【编程10000问】<% function checkisUrl(tmpString) dim c,i checkisUrl = true tmpString=Lcase(trim(tmpString)) if left(tmpString,7)<>"http://" then tmpString="http://"&tmpString &n...
|如何|何判|判断|断U|UR|RL|L格|格式|式是|是否|否符|符合|合规|规范|范？|？|
