玩的就是Code

原创 [Oracle]生成树状结构的SQL

下面我们以PF_MENU这张表当作我们的数据表。 1、首先，我们查得整个表的数据： //CDID：菜单ID； FCDID：父菜单ID；CDM：菜单名称。 FCDID=0是最高级菜单；CDM=- 是 分割线SELECT CDID,FCDID,CDM FROM PF_MENU 得到的数据，如下（以下列举部分数据，不是完整的）：CDID FCDID CDM3002 3

原创 多个Select标签数据过滤的动态显示

1.现在有两个Select标签。select1用来显示NBA球队名称，select2用来显示具体球队的球员名次，也就是说  select2 的数据是根据select1的切换而显示不同的内容。 凯尔特人 76人 尼克斯 篮网 猛龙 活塞 步行者 骑士 公牛 雄鹿 热火 魔术 老鹰 奇才 山猫 森林狼 掘金 爵士 开拓者 超音速 国王 太阳 湖人 快船 勇士 马刺 灰熊 小牛 火箭 黄蜂 2.我们用的

原创 关于showModalDialog和showModelessDialog路径问题

关于 showModalDialog 和 showModelessDialog 打开窗口的路径2个以上参数问题. 1.路径名从数据库取出,放到一个变量里,且带了3个参数.如数据库的路径为    fhgl/loadMain.do?open=1&khbh=00109033&devid=0000006 , 存放的字符串会转化为fhgl/loadMain.do?open=1&khbh=001090

原创 [Struts-Dbgrid]自制的Struts DbGrid标签秀

1.最初的纯JS版，用xml作为数据源，超过50条数据后，明显感觉慢。  路径:sql->recordset->collention->xml->dbgrid。 2.改成JavaBean的方式，直接传入sql。破坏了MVC模式，但速度是最快的 。  路径:sql->recordset->dbgrid。 3.最终的Struts标签，同时支持sql和collention作为数据源。2，300条数据还是

原创 [原创][Web—TabPage]TaoBao网的那个TabPage的代码（cool）

ul.TabBarLevel1{ list-style:none; margin:0; padding:0; height:29px; background-image:url(http://pics.taobao.com/2k5/sys/component/tabbar_level1_bk.gif);}ul.TabBarLevel1 li{ float:lef

原创 [原创]Delphi中ScriptControl的高级应用（二）

Delphi中ScriptControl的高级应用（二）5、Delphi中使用JavaScript的Base64的加解密算法   搜索google：javascript base64加密 就会找到很多base64加密的代码，以下就是本人搜索到的一段代码（以下代码版权归其原作者）：var base64EncodeChars = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghi

原创 [原创]Delphi中ScriptControl的高级应用（一）

Delphi中ScriptControl的高级应用（一）在我们的Windows系统里提供了一个叫ScriptControl的OCX组件，我们可以用这个组件来实现脚本故事世界的精彩。1、创建ScriptControl组件服务首先，我们来看一下该组件都有哪些方法和属性。如图001，002。图001图002 接着，我们用Delphi创建组件服务。   从图001可知，该组件的ProgID为“MSScri

原创 [原创]Oracle天大的Bug

任何发现都需要痛苦的经理，而我就是被这样折磨后发现了这个bug可执行文件在开发的时候好好的，随便怎样都能运行可当我把它考到别的目录下，它始终连不上数据库我的开发工具是Delphi5，数据库是Oracle9i它报的ErrorCode为06421。从网上搜索了好久也没有找到任何答案......只找到了很多从这台机子上可用，可是到了别台机子就无法连接Oracle的种种求救讯息还好，终于被我找到了这个该死

原创 界面规范

一份界面规范（c/s） 原文地址：http://www.cnblogs.com/jiezhi/archive/2005/03/14/118531.html<!--<rdf:RDF xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"xmlns:dc="http://purl.org/dc/elements/1.1/"xmlns:

原创 [PB+Delphi]主应用程序用的是PB，操作界面调用Delphi开发的DLL

需求：由于最近接到这样的项目，甲方他们要求我们开发的功能加入他们原先已经存在的一个PB开发的应用程序中。唯一的目的是不想有两个exe应用程序。方案：把Delphi的应用程序用dll的形式打包，然后在PB里调用。设计：        一、 PB部分                 1、新建一个非可视化的类n_cst_demo,我们把同一模块的调用都放到 这个类里。                  

原创 关于exe文件传递参数方法

关于exe文件传递参数方法昨天同事问到，delphi里exe文件如何传递参数？因为手头装了Delphi,PowerBuilder以下就是代码：Delphi:以下内容为程序代码:procedure TForm1.FormCreate(Sender: TObject);var  i: Integer;begin  for i:=1 to ParamCount  do  

原创 [又一款精彩滚动loading]

原创 [表格全功能演示（包括添加，删除，移动，单元格选择，行选择等）]

大家保存到本地运行吧！Sample (DHTML Dude)  TR {background-color: white; color: black; font-family: verdana; font-size: 20; font-weight: bold;}  Table Editor单击选择单元格，按下Alt键选择一行！       Cell 1,1Cell 1,2Cell 1,3    

原创 [原创]仿Bindows的登陆渐变滚动条（2）---双向循环滚动

将以下代码复制回本地演示吧！.s1{position:relative;left:0;text-align:center;width:1;BORDER-RIGHT: #FFFFFF 1px solid; PADDING-RIGHT: 2px; BORDER-TOP: #FFFFFF 1px solid; PADDING-LEFT: 2px; FONT-SIZE: 12px; FILTER: pro

原创 [原创]仿Bindows的登陆渐变滚动条（1）---单向滚动

var i;function longtime(){ i=0; b1.style.cursor="wait"; b1.disabled=true; timedIterations(); }function timedIterations(){ if (i<=500) { //d1.innerText=i;

原创 [原创]将TDC进行到底(2)：实现数据的刷新（只刷新表格数据）|并欣赏将TDC和StedyMenu结合的效果

这个刷新，大家自己添加吧，非常简单！因为CBC10.asp内容是动态的，所以数据也是最新的。这样刷新，只刷新表格内容，不影响Web内其它的内容，且保留当前的排序状态及过滤状态function doRefresh(){    tdcComposers.DataURL="CBC10.asp";    tdcComposers.Reset();}我把最近的TDC及StedyMenu结合到我们的业务系统，

原创 [原创]将TDC进行到底：将数据保存到Excel里

在 http://blog.csdn.net/juwuyi/archive/2004/10/18/141255.aspx提供的TDC的例子中增加下面这个函数可以将数据保存到Excel里。function SavetoExcel(){    var rst=tdcComposers.recordset;    var xlApp= new ActiveXObject("Excel.Applicati

原创 [Button]几个漂亮的Button的CSS

.btn { BORDER-RIGHT: #7b9ebd 1px solid; PADDING-RIGHT: 2px; BORDER-TOP: #7b9ebd 1px solid; PADDING-LEFT: 2px; FONT-SIZE: 12px; FILTER: progid:DXImageTransform.Microsoft.Gradient(GradientType=0, St

原创 [原创]修改了StedyMenu为js版的可动态增加，如图，并赋上JS代码

1.用的是Stedysoft的2k3Menu里的图片，css，及3个htc:2k3MenuBar.htc,2k3Menu.htc,2k3MenuRoot.htc2.需要修改的地方就是 将 2k3MenuRoot.htc 里的 修改为，然后将给htc有关menu的都改为subMenu;3.我修改的js脚本如下：var oMenubar;//Nodes.Add("R",4,"P3","Item0")

原创 [原创]如何实现图片明明是gif或者jpg的，可另存为的时候却变成“无标题”的BMP文件呢？

事实上很简单，就是将图片的路径换成是动态取得的，就OK了。 保存的时候是根据图片的src的后缀名来判断的，因为没有找到图片的后缀名，所以就默认为bmp的。demo1.htm==========demo.asp:==========Response.Redirect("http://localhost/Blog/images/cc.png")%>===================按照以上写法就O

原创 [原创]IE里的保存对胡话框里自己设定保存格式

1.使用CommandDialog作为选择对话框2.使用FSO对象来写文件 height=0px width=0px classid=CLSID:F9043C85-F6F2-101A-A3C9-08002B2F49FB>function SaveDocument(){   cDialog.CancelError=true;   try{    cDialog.Filter="HTM Files

原创 [原创]用脚本控制Select的展开与折叠，或者说是下拉。

1.首先将焦点给Select2.然后模拟按键Alt+↓。模拟按键是使用ActiveX控件来完成的。代码如下：classid="clsid:F935DC22-1CF0-11D0-ADB9-00C04FD58A0B">None序号抄表册抄表册名称抄表册性质抄表周期管理部门变压器组号变压器性质抄表员代码抄表员姓名抄表列日浮动天数初始化标志缴费天数抄表方式 展开Js版function demo()

原创 ［原创］[利用TDC实现表格的排序，过滤，上下条滚动及表格分页]

先看张图片，需要代码的朋友，在此留言一个一个内容传吧说明：共有3个文件，其中 tdcdemo.htm是主界面。表格里的排序图标是用VML动态画成的。具体的形状可以根据自己的喜好来画。CBC10.asp是数据文件，在实际应用中可以通过asp或jsp来动态输出数据，输出的数据按照一定格式就可以了，可以用记事本打开CBC10.asp里看里面的格式，也可以定义成你自己喜欢的格式Modal.htm是在tdc

原创 [原创][ActiveX]TreeView完全实例

当很多都在追求各式各样的目录Tree的时候，我却搬出那个我觉得是功能和性能都最好的TreeView，但就是不够美！   classid="clsid:C74190B6-8589-11D1-B16A-00C0F0283628">function Init(){with(TreeView1){ LineStyle=1; DragMode=0; BorderStyle=0; ToolTipText=

原创 [ActiveX]Web中使用ListView 完全示例

 body     { font-size: 10px }table    { font-size: 12px }-->function InitList(theList, theTable, iEnd, iId, checkIt){var colWidth = (document.body.clientWidth - 200) / iEndwith(theList){View = 3B

原创 [Delphi] QQ尾巴源码

说明：1.只为了学习Hook技术。2.只针对QQ2004Preview版。3.只监视Ctrl+Enter。4.先打开QQ聊天对话框5.在文本框里输入尾巴信息。6.点击“开启QQ尾巴”。7.使用Ctrl+Enter发送QQ消息。8.请大家不要用于恶意行为！============JoeCom=====Dll：library HookDll; { Important note about

原创 开篇，从Kingofark那转过来的 关于学习C++和编程的50个观点 2003修订版

Kingofarks 50 Points of View About Learning C++ And Programming K ][ N G of A R K?关于学习C++和编程的50个观点 2003修订版 Revision 2.0 by K ][ N G of A R K ? 前 言 Long long time ago, on a topic far far away……是的，很久很