vbs 中如何取小数的余数?

VBS 中如何取小数的余数?

ys=a-(Fix(a/b)*b)
原理:a为被除数,如你题为1.5,b为除数,如你题为1,由a除以b之后的商的整数部分再乘以除数,再用被除数去减,就得到余数部分

例:a=4   b=3
余数应当为1
ys=4-(Fix(4/3)*3)=1

正数负数都可以显示出来

效果要比mod 好用

VB中通用

js 自动切换背景图片

<script>
  var aaa=['1280X8001.jpg','1280x800.jpg','fds.jpg'];
  var count = 0;
  function on_load(){   
    document.body.style.background="url("+aaa[count]+")";
...

More...

document.body的一些用法

网页可见区域宽: document.body.clientWidth;
网页可见区域高: document.body.clientHeight;
网页可见区域宽: document.body.offsetWidth    (包括边线的宽);
网页可见区域高: document.body.offsetHeight   (包括边线的宽);
网页正文全文宽: document.body.scrollWidth;

More...

鼠标点击输入框,文字内容消失

原始效果:

 

当鼠标点击名字的输入框时,文字消失此js效果方便客户输入时不用一个个删除内容再填,提高客户体验 input 的方法:<input name="" type="text" size="18" nclick="" onfocus="if(this.value=='请在此输入您的称呼')

More...

word-wrap: break-word;

word-wrap: break-word;

css样式表中,自动分段时 单词自动分开的代码

dreamweaver 里是没有这段代码的

asp 常用自定义函数大全

==================================================
'函数名:GetHttpPage
'作 用:获取网页源码
'参 数:HttpUrl ------网页地址
'==================================================
Function GetHttpPage(HttpUrl)
If IsNull(HttpUrl)=True Or Len(HttpUrl)<18 Or HttpUrl="$False$" Then

More...

.pat格式文件制作(pat是photoshop 里的图案文件)

PAT格式的图形文件是PS(photoshop)中的图形填充文件.我找遍了各个图形转换软件都没什么进展,没有什么好的快捷的办法只能用PS(photoshop)制作....

More...

flash AS 3.0按钮跳转代码

从AS 2.0到AS 3.0,我们要鼓起很大的勇气。

在AS 2上有时候很简单的一句代码可以搞定的事情,在AS 3中却需要一大段代码来。

而有时候在AS 2中很长的一段代码,在AS 3中却轻易搞定。鱼和熊掌又怎么能兼得呢?

就比如说我们做FLASH网站常常要用的按钮跳转吧。

More...

FCKeditor 2.6.5 ASP环境安装配置使用说明

这篇文章解救了我两天来的郁闷,感谢网路上的朋友,现在转载如下:

------------------------------------------------------

今天用到在线编辑器在asp环境下上传竟然无效。。。。找了好久才找到这介绍,现备份于此

FCKeditor 2.6.4 ASP环境安装配置使用说明

需要留下的有

根目录下:editor目录 、fckconfig.js、 fckeditor.asp fckeditor.js fckstyles.xml fcktemplates.xml 这几个保留,其余的全部去除;

More...

Description和Keywords 导致页面样式乱的处理方法

<meta name="Keywords" content="<%=keywords%>">
<meta name="Description" content="<%=jianjie%>">
我们在经常描述页面的Description和Keywords时 遇到让客户后台自己添加数据的情况,如果是英文网站,就会出现乱码或者样式表混乱的现象,解决方法是写段函数,调用它就可以了

More...

asp中日期的相减

datediff("d",da2,da1)

返回天数 da1-da2的 但一定要日期类型的 否则出错

例如:

dim days,fday,nfday

fdy=2011-4-27

nfdy=2011-4-28

Days=datediff("d",cdate(fday),cdate(nfday))
 

days就等于1

More...

like 查询是比较慢,用=来查询快得多

测试环境:

windows 2003 server

iis6

access 2003

asp

数据库数据约23万   230,583

经过测试

like 查询是比较慢,用=来查询快得多

More...

去除数据库中重复的数据(sql语句)

SQL语句如下:

DELETE FROM T_S_POS_SHOPRECODE A
    WHERE (A.POSID, A.SHOPTIME, A.CARDID) IN
    (
     SELECT POSID, SHOPTIME, CARDID
     FROM T_S_POS_SHOPRECODE

More...