首页
快乐星球
归档统计
留言板
友情链接
Search
1
service mysql start出错,mysql启动不了,解决mysql: unrecognized service错误
870 阅读
2
每日签到实现
817 阅读
3
二、1.Sublime Text 3使用SublimeLinter配置JS,CSS,HTML语法检查
816 阅读
4
影评---最佳出价
807 阅读
5
ERROR: unable to bind listening socket for address '127.0.0.1:9000': Address already in use
780 阅读
开发
apache
nginx
Css
Laravel
Js
C#
PHP
Asp
Wordpress
微信
Html5
uni
python
环境配置
Linux
windows
MySql
数据库
Sql Server
git
wdcp
生活
工作
视频制作
阅读
登录
Search
标签搜索
看书
工作
C#
PHP
Wordpress
Laravel
Linux
Git
混淆
Uni
生活
WDCP
阅读
IIS
开发
羽化
累计撰写
135
篇文章
累计收到
22
条评论
首页
栏目
开发
apache
nginx
Css
Laravel
Js
C#
PHP
Asp
Wordpress
微信
Html5
uni
python
环境配置
Linux
windows
MySql
数据库
Sql Server
git
wdcp
生活
工作
视频制作
阅读
页面
快乐星球
归档统计
留言板
友情链接
搜索到
3
篇与
的结果
2016-08-17
AspJpeg组件失效的完美解决方案
刚刚上传图片的时候发现图片没有水印,以为代码错误,经检查发现没错,竟然提示http500错误,我关闭Http错误信息友好提示,发现这样的提示:Persits.Jpeg.1 错误 '800a0004'刚刚上传图片的时候发现图片没有水印,以为代码错误,经检查发现没错,于是登录PJ论坛搜索看看,在论坛发现自己个性签名的图片也失效了,于是手动打开up.asp,竟然提示http500错误,我关闭Http错误信息友好提示,发现这样的提示:Persits.Jpeg.1 错误 '800a0004'AspJpeg has expired. Please visit to purchase a registration key.郁闷,提示过期了,回想装的时候,确实没有注册。运行regedit,在注册表中找到HKEY_LOCAL_MACHINE\Software\ Persits Software\AspJpeg,只有一个Expires项,于是在AspJpeg下新建一个项:RegKey 然后将默认值更改为48958-77556-02411查看过期时间的方法,新建一个asp文件,代码如下,传到空间运行即可看到一个时间,这就是AspJpeg过期的时间:<% Set Jpeg = Server.CreateObject("Persits.Jpeg") Response.Write Jpeg.Expires %>就会显示到期的年月日
2016年08月17日
528 阅读
0 评论
0 点赞
2016-08-06
ASP时间操作函数
vbscript基本时间函数介绍1、基本函数date() --当前日期,格式:2004-2-28time() --当前时间,格式:22:24:59now() --同时含有日期和时间, 格式: 2005-5-2 22:37:302、获取年、月、日、时、分、秒创建日期变量d=date()创建时间变量t=time()获取年份:year(d)获取月份:month(d)获取日子:day(d)获取星期几:weekday(d)获取小时:hour(t) 获取分钟:minute(t)获取秒数:second(t)注意: vbscript没有js中的getTime()函数3、通过指定日期创建日期和时间变量:1)DateSerial(year, month, day)该函数能自动调整输入数值:比如输入day=35,则自动计算到下个月。再比如:DateSerial(1990 - 10, 8 - 2, 1 - 1) 则计算1990 年8月1日的十年零两个月又一天 之前的日期,也就是1980年5月31日。2)DateValue(日期字符串)通过各种日期格式串创建日期变量。例如输入:12/30/1991 、 December 30, 1991 、 Dec 30, 1991。3)TimeSerial(hour, minute, second) 将数值转化为时间变量。原理同DateSerial。4)TimeValue(时间字符串)将各种时间格式串转化为时间变量。原理同DateValue。5)也可以直接创建时间变量比如:d = #2/10/96 16:45:30# 6)cdate(时间日期字符串)根据字符串自动转换为date,time,now等类型4、获取日期的部份值DatePart(interval, date[,firstdayofweek[, firstweekofyear]]) 例如,可以使用DatePart 计算某个日期是星期几或目前为几点钟。举例;d = #2/10/96 16:45:30# DatePart("yyyy",d)) '1996 DatePart("m",d) '2 DatePart("d",d) '10 DatePart("h",d) '16 DatePart("n",d) '45 DatePart("s",d) '30 DatePart("q",d) '1---2月是第1季 DatePart("y",d) '41---2月10日是1996年的第41日。 DatePart("ww",d) '6---2月10日是1996年的第6周。 DatePart("w",d) '7---2月10日在在1996年是第6周的第7日(星期六)。5、日期推算函数(根据给定的日期、再增加或者减去一个时间量,得到另一个日期)DateAdd(interval, number, date)参数说明:interval-运算的基准间隔number-加上多少,为负数就是减去时间量date-基准日期下面是interval的可选值,注意使用时加上引号("):设置 描述yyyy 年q 季度m 月y 一年的日数d 日w 一周的日数ww 周h 小时n 分钟s 秒日期相加举例:1、计算明天:tomorrow=DateAdd("d",1,date())2、2012年12月1日的前一天:preday=DateAdd("d",-1,"2012-12-1")6、日期相差函数(计算两个日期之间的间隔时间量)DateDiff(interval, date1, date2, firstdayofweek])计算两个日期之间相差的间隔。例如,来计算两个日期之间相隔几日;或计算从今天起到年底还有多少个星期。如果date1比date2 晚,则返回负数。 返回值的单位由interval决定。参数说明:interval-同DateAdd()函数 Date1,date2 -进行运算的两个日期 可选参数:firstdayofweek- 指定一个星期的第一天的常数。如果未予指定,则以星期日为第一天。当计算两个日期相差几周时(时间间隔符号 “w” 或 “ww”),该参数会影响结果。具体请搜索。 firstweekofyear-指定一年的第一周怎么确定,如果未予指定,则以包含 1 月 1 日的星期为第一周。具体请搜索。 7、其他:Timer()-午夜开始到现在经过的秒数,带两位小数点数值。
2016年08月06日
428 阅读
0 评论
0 点赞
2016-08-05
做了CDN加速的ASP网站获取用户真实IP程序
现在在移动、电信、联通三大运营商的竞争下,网站为了能在三大运营商下均能正常访问一般都会选择开启CDN加上。CDN加速开启后获取的IP就会成为CDN节点的IP这样非常不利于防止数据注入和唯一性的判断。写了下asp取真实IP的代码,搭环境测试无代理、一级或多级代理的情况,可以正常获取function checkip(checkstring)'用正则判断IP是否合法 dim re1 set re1=new RegExp re1.pattern="^[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}.[0-9]{1,3}$" re1.global=false re1.Ignorecase=false checkip=re1.test(checkstring) set re1=nothing end functionfunction get_cli_ip() '取真实IP函数,先 HTTP_CLIENT_IP 再 HTTP_X_FORWARDED_FOR 再 REMOTE_ADDR dim client_ip if checkip(Request.ServerVariables("HTTP_CLIENT_IP"))=true then get_cli_ip = checkip(Request.ServerVariables("HTTP_CLIENT_IP")) else MyArray = split(Request.ServerVariables("HTTP_X_FORWARDED_FOR"),",") if ubound(MyArray)>=0 then client_ip = trim(MyArray(0)) if checkip(client_ip)=true then get_cli_ip = client_ip exit function end if end if get_cli_ip = Request.ServerVariables("REMOTE_ADDR") end if end function
2016年08月05日
473 阅读
0 评论
0 点赞