在PB中使用JavaScript脚本函数
在PB中使用JavaScript脚本函数
在PB中使用JavaScript脚本函数
现在许多的信息系统都是基于B/S版本，但PB写的信息系统生存空间也比较大，往往是一个信息系统即有PB版本也有B/S版本。信息系统会有许多的业务规则，B/S中业务规则的检查在JavaScript脚本中实现，如果在PB中又实现一次，费时费力不说，
业务规则改变又要重新编译分发。如果在PB中调用在B/S中实现的JavaScript脚本来完成业务规则，省时省力维护量减小，下面就让我们来实现吧。
一、环境说明
在PB中运行脚本语言需要借助msscript.ocx组件。注册表中的对象是MSScriptControl.ScriptControl.
运行regedit.exe查找一下看是否已存在，如果没有就下载一个吧，别忘了注册呵！
二、在PB中声明
oleobject io_script
io_script = create oleobject
long ll_1=io_script.connecttonewobject( "MSScriptControl.ScriptControl")
if ll_10 then
messagebox('提示','创建MSScriptControl.ScriptControl对象出错，请注册msscript.ocx')
return -1
end if
三、装入js文件
li_file = FileOpen(gs_currentpath+"Check.js")
if li_file=-1 then
return -1
end if
li_readline=FileRead ( li_file, ls_1 )
do while li_readline>-1
ls_js=ls_js+ls_1+'~r~n'
li_readline=FileRead ( li_file, ls_1 )
loop
fileclose(li_file)
io_script.language="JScript"
io_script.addcode(ls_js)
四、调用JS中的函数
any la_1=io_script.run("CheckFile",ls_filename)
CheckFile 是JS中的函数，ls_filename是CheckFile 函数的参数。
相关文档：
这三个语言分别是三个公司开发的，SUN的Java，Netscape的JavaScript，Microsoft的JScript
JavaScript是由Netscape公司开发并随Navigator导航者一起发布的、介于Java与HTML之间、基于对象事件驱动的编程语言，不需要Java编译器，而是直接运行在Web浏览器中，它的前身是Live Script。
JScript是一种类似JavaScript的语言� ......
实例效果
预览效果1：
这是一个颜色梯度变化演示：
预览效果2：
一个颜色渐变的菜单：
Cropper
Tween
Slider
Resize
Drag
预览效果3：
颜色渐变的有趣应用，点击随机颜色渐变：
点击随机换颜色
程序说明
【ColorGrads颜色梯度】
程序ColorGrads的作用是通过StartColor和EndColor生成颜色梯度集合。
颜色都� ......
在web上编写菜单一直是比较头疼的事情，要是有个类直接套用就好了，最近又要做网站了，烦人，要求做的还是多级菜单，唉，废话少说，遇到问题就要解决啊，看代码：
function is(e, handler) {
if (e.type != 'mouseout' && e.type != 'mouseover ......
层的开发在实际应用中比较重要，比如漂浮广告等等，我这里简单探讨一下。
1. 控制层的显示或隐藏
两种办法，其实都是控制样式的。
办法一：控制 display 属性
<script language="javascript">
function show(status)
{
document.getElemen ......
