- 博客(60)
- 收藏
- 关注
RSS订阅原创 css footer适应长短页面
<br /><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"><html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=utf-8" /><ti
2011-04-08 14:03:00
1128
1
原创 VB mcisendstring 方法
做个mp3播放器，用realplay和WMP做出来的程序内存占用太大。如果你仅仅是播放MP3，建议使用API函数mciSendString。Option ExplicitPrivate Declare Function mciSendString Lib "winmm.dll" Alias "mciSendStringA" (ByVal lpstrCommand As St
2010-04-21 16:30:00
3625
原创 php printf()
printf()函数是格式化输出函数, 一般用于向标准输出设备按规定格式输出信息。在编写程序时经常会用到此函数。函数的原型为：int printf(const char *format, ...);函数返回值为整型。若成功则返回输出的字符数，输出出错则返回负值。printf()函数的调用格式为:printf("", );其中格式化字符串包括两部分内容: 一部分是正常字符, 这些字符将按原样输出;
2009-06-23 09:32:00
1824
1
原创 javascript 事件
一般事件事件 浏览器支持 描述onClick IE3|N2|O 鼠标点击事件，多用在某个对象控制的范围内的鼠标点击onDblClick IE4|N4|O 鼠标双击事件onMouseDown IE4|N4|O 鼠标上的按钮被按下了onMouseUp IE4
2009-06-12 10:38:00
610
原创 使用 CONVERT：
使用 CONVERT：CONVERT (data_type[(length)], expression [, style]) Select CONVERT(varchar(100), GETDATE(), 0): 05 16 2006 10:57AM Select CONVERT(varchar(100), GETDATE(), 1): 05/16/06 Select CONVERT(
2009-05-07 13:19:00
855
原创 中国能养多少“士”？？
现在的大学采取量化管理，规定老师们从讲师升为副教授，要发多少篇论文，从副教授升为教授，又要发多少论文。在这样的制度下，大学里的老师变成了母鸡，根本没有心思好好做学问，好好带学生，光忙着生蛋发论文了。 他们让我再生些‘创新型’的蛋！我回答他们：滚你妈的蛋！ 大学应该有更宽松的环境让老师把更多心思放在如何培养学生上，至于‘下蛋’，有蛋则生，无蛋则养。孟尝君还养士三千呢。 ---
2009-04-24 11:18:00
1124
1
原创 查询表信息
--参考: SELECT 表名=case when a.colorder=1 then d.name else end, 表说明=case when a.colorder=1 then isnull(f.value,) else end, 字段序号=a.colorder, 字段名=a
2009-02-16 14:59:00
697
原创 获取数据库表名和字段
--读取库中的所有表名 select name from sysobjects where xtype=u --读取指定表的所有列名 select name from syscolumns where id=(select max(id) from sysobjects where xtype=u and name=表名)获取数据库表名和字段s
2009-02-16 13:55:00
853
转载 在VB中实现移动没有标题栏的窗口
通过消息的发送实现移动无标题窗体。当鼠标按下、移动或释放时，将鼠标在窗体上按下的消息(消息值为HTCAPTION)发出，就可以拖动窗体了。代码如下： Private Declare Function ReleaseCapture Lib "user32" () As Long Private Declare Function SendMessage Lib "u
2008-11-18 15:00:00
925
原创 VB 关闭其它窗口
Option ExplicitPrivate Sub Toolbar1_ButtonClick(ByVal Button As MSComctlLib.Button)Dim f1 As FormSelect Case Button.IndexCase 1 Set f1 = New Form1 Form1.Show unloadothe
2008-10-23 17:14:00
1020
原创 VB6.0 自動生成 get let方法的工具
Option ExplicitDim s As StringPrivate Sub Command1_Click()CD.Filter = "TXT|*.txt"CD.ShowOpenText1 = CD.FileNameEnd SubPrivate Sub Command2_Click()Dim temp As String, b() As St
2008-09-27 08:50:00
1228
原创 MoveComplete WillMove vb6
adodc recordset Procedure declaration does not match description of event or procedure having same name 報這個錯了么 ？ 引用Microsoft ActiveX Data Objects 2.0 Library就好了 2.1以上都不好用
2008-08-29 09:26:00
738
原创 Delphi ： Application.MessageBox
Application.MessageBox 是 TApplication 的成员函数，宣告如下：function TApplication.MessageBox(const Text, Caption: PChar; Flags: Longint): Integer;自变量： 1. Text：要显示的讯息 2. Caption：讯息窗口的标题列文字 3. Flags：讯息旗标
2008-07-25 09:47:00
1312
原创 vb 进程控制 查询 关闭
Option ExplicitPublic Const sEndProess As String = "excel.exe" '注意必须小写Public Declare Function CreateToolhelp32Snapshot Lib "kernel32 " (ByVal dwFlags As Long, ByVal th32ProcessI
2008-07-16 16:34:00
1161
原创 吃辣椒？
辣椒瘦身辣椒，那个让你又爱又恨的家伙，让你啧啧出汗却欲罢不能，它玲珑的身体里包裹着一团燃烧的烈火，是蔬菜中最有激情和热情的角色，现在，调皮的它又多了一个你无法拒绝的理由：燃烧脂肪，修身塑体！ 脂肪何以被燃烧 1、辣椒燃烧脂肪的奥秘是什么？关键在于——辣椒碱，只须吃上一两勺，它的刺激口味即刻会向脑神经发出“足够”讯号，导致食欲大减。同时辣椒碱的另一大作用是刺激体内生热系统，加快新陈代
2008-07-08 11:17:00
823
原创 大男人小女孩
林俊杰 - 大男人小女孩☆专辑:西界不是我的错 我们都听过完美的时候 要更多找这时候说的太多有时候的我只想和你一样沉默不想单单罗罗嗦嗦水也灭不掉的火也许大男人真的很男人少了点风度 还是不承认有时候错的并不知道错的不想借口只是直接一天说有时候女孩没那么小孩心里的无奈也需要点关怀遗憾的遗留变成勉强了怎么能重新再来不是我的错 我
2008-06-30 19:48:00
911
原创 Delphi Format方法说明
function Format(const Format: string; const Args: array of const): string; overload; ormat方法有两个种形式，另外一种是三个参数的，主要区别在于它是线程安全的，但并不多用。Format参数是一个格式字符串，用于格式化Args里面的值的。 Args是一个变体数组，表示用以输出的各个常量或变量。如以下例子：
2008-06-27 14:30:00
1286
原创 神奇的滤镜
HTML {...}{ FILTER: progid:DXImageTransform.Microsoft.BasicImage (grayscale=1)}
2008-05-20 09:41:00
680
原创 关于地震想到的
请媒体尽量减少现场救援报道，救援现场需要安静，这样更多人的求救声音会被听到。 建议捐款者们尽量实名捐款，这样多少能对善款使用效率低下和贪污问题有所抵制。 地震的时候玻璃不容易被震碎 吗？看了很多照片，完好的房子一般玻璃都没碎。 关于80后的生死观。。。
2008-05-19 08:15:00
546
原创 a标签target试验
Top.htmlhtml>frameset rows="*,*" cols="*,*"> frame src="MidNode.html" /> frame src="Node.html" /> frame src="Node.html" /> frameset cols="*,*" > frame src="Node.html" />
2008-04-24 10:59:00
798
原创 打印數組的全部排序
Dim f As String Sub printstr(s() As String) Dim s2() As String, k As String If UBound(s) - LBound(s) = 0 Then Print f & " " & s(LBound(s)) Else For i = LBound(s) To UBound(s
2008-04-03 09:19:00
743
原创 InternetSetOption 网络API
InternetSetOption函数 用到的变量 ------------------------------------------------- Private Const INTERNET_OPTION_CONNECTED_STATE = 50 Private Const INTERNET_STATE_DISCONNECTED_
2008-03-28 13:29:00
5048
1
转载 FCKeditor在 JSP和JSF 网站项目中的应用
让FCKeditor在 JSP和JSF 网站项目中跑起来一、准备功夫1.1 下载最新版的FCKeditorhttp://www.fckeditor.net/download/目前最新版是：FCKeditor 2.3.1（FCKeditor_2.3.1）和 FCKeditor.Java（FCKeditor-2.3）1.2 如果需要使用到jsf的标签库，则还需要下载fck-faces-1.5.1, 你
2008-03-11 09:03:00
842
原创 14 个经典的Javascript代码
■打开■ ■另存为■ ■属性■ ■打印■ ■页面设置■ ■刷新■ ■导入收藏■ ■导出收藏■ ■加入收藏■ ■整理收藏夹■ ■查看原文件■ ■语言设置■ ■前进■ ■后退■
2008-01-24 08:10:00
572
转载 学校教育真的那么重要吗？
李子暘 @ 2007-12-24 21:35:08 前几年，社会舆论大力宣传要重视教育，并且严厉抨击那些不让自己的孩子接受更多教育的家长。这些家长被指责为目光短浅、盲目追求眼前利益，而不惜放弃自己子女成才的机会。他们注定要在以后后悔不已。 这种舆论看起来非常正确，但是其中却有着明显的不合情理之处。按理来说，天下最关心孩子的莫过于他们的家长。不容易理解，为什么外人比家长更关心孩子
2007-12-26 08:36:00
938
原创 javascript基础
每一项都是js中的小技巧，但十分的实用！ 1.document.write(""); 输出语句 2.JS中的注释为// 3.传统的HTML文档顺序是:document->html->(head,body) 4.一个浏览器窗口中的DOM顺序是:window->(navigator,screen,history,location,document) 5.得到表单中元素的名称和值:document.g
2007-12-19 13:21:00
1168
原创 小说亵渎
《亵渎》看了2遍半，有点感想：1．老狐狸休斯其实是希洛的化身，从他的年龄上看，正好是精灵族帝国落寞的后期。 再者，艾菲尔在最后离开精灵圣地的时候，休斯让她自己躲起来，由他来挑战天界主身，还说自己分身无数、不会有事，这时艾菲尔质问休斯“您的茶杯不是只剩下一个了吗？”，休斯哑口无言。这说明艾菲尔是知道修斯是有分身的，再联想休斯描述的“亿万之主”席尔洛拥有化身亿万的威能，可以猜测：休
2007-11-13 17:02:00
2219
转载 正则表达式入门教程（有删节）
版本：v2.21 (2007-8-3) 作者：deerchao 来源:unibetter大学生社区 转载请注明来源文本格式约定：专业术语 元字符/语法格式 正则表达式 正则表达式中的一部分(用于分析) 用于在其中搜索的字符串 对正则表达式或其中一部分的说明清除格式正则表达式到底是什么？在编写处理字符串的程序或网页时，经常会有查找符合某些复杂规则的字符串的需要。正则表达式就是用于
2007-11-13 11:02:00
812
原创 关于如何添加桌面快捷方式
Private Declare Function OSfCreateShellGroup Lib "Vb5stkit.dll" _ Alias "fCreateShellFolder" (ByVal lpstrDirName As String) As Long Private
2007-10-25 15:41:00
4482
原创 利用VB制作托盘
1、新建立一个VB6工程，将Form1的ShowInTaskBar属性设置为False 2、菜单：工程--添加模块 按“打开”这样就添加了一个新模块，名为Module1,保存为Module1.bas 3、在Module1中写下如下代码： Option Explicit Public Const MAX_TOOLTIP As Integer = 64 Public Const NIF_ICON =
2007-10-25 15:35:00
862
原创 ExitWindowsEx
退出操作系统可以调用Windows API的ExitWindowsEx函数。在Win9x下，只要简单地调用ExitWindowsEx函数就可以实现关机或者重新启动。但是在Win 2000/XP下调用ExitWindowsEx函数时，还需要先调用AdjustTokenPrivileges函数。下面的例子在Win9x和Win 2000/XP下都可以使用。请参考程序中的注释。 例子： 1、建立一个窗体，
2007-10-25 15:33:00
1428
转载 JavaScript的9个陷阱
来自Nine Javascript Gotchas, 以下是JavaScript容易犯错的九个陷阱。虽然不是什么很高深的技术问题，但注意一下，会使您的编程轻松些，即所谓make life easier. 笔者对某些陷阱会混杂一些评点。 1、最后一个逗号 如这段代码，注意最后一个逗号，按语言学角度来说应该是不错的（python的类似数据类型辞典dictionary就允许如此）。IE会报语
2007-10-24 08:29:00
597
原创 MSXML2.XMLHTTP
XmlHttp是一套可以在Javascript、VbScript、Jscript等脚本语言中通过http协议传送或从接收XML及其他数据的一套API。XmlHttp最大的用处是可以更新网页的部分内容而不需要刷新整个页面。 来自MSDN的解释：XmlHttp提供客户端同http服务器通讯的协议。客户端可以通过XmlHttp对象(MSXML2.XMLHTTP.3.0)向http服务器发送请求并使用微软
2007-10-11 14:00:00
1477
原创 关于Adodb.Stream 的使用说明
组件："Adodb.Stream" 有下列方法： Cancel 方法 使用方法如下 Object.Cancel 说明：取消执行挂起的异步 Execute 或 Open 方法的调用。 Close 方法 使用方法如下 Object.Close ：关闭对像 CopyTo 方法 使用方法如下 Object.CopyTo(destStream,[CharNumber]) 说明：将对像的数据复制，destSt
2007-10-11 13:49:00
576
原创 Scripting.FileSystemObject对象
Set fso = Server.CreateObject("Scripting.FileSystemObject") 定义FSO对象 fso.CreateFolder(Server.MapPath(folder)) 得到路径 Set fout = fso.CreateTextFile(Server.MapPath(filepath)) 定义创建对象 fout.WriteLine mb_code
2007-10-10 15:35:00
1048
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人