2004年10月_greystar

12月 11月 10月 09月 08月

原创无提示关闭窗体

我们知道用close()可以无提示关闭一些用open()方法打开的窗口。只要被关的窗口有一个opener，就不会有提示。我们可以用脚本给window.opener赋值（任何值，包括字符串、数值、现有的变量、甚至是null），执行close()时就不会有提示了。以下内容为程序代码:function closewin(){window.opener=anyone;window.

2004-10-23 15:43:00 1538

Randomly Sorting Query Results 查询结果随机排序 Q. How can I randomly sort query results?问：怎样才能对查询结果随机排序？A. To randomly order rows, or to return x number of randomly chosen rows, you can use the RAND function

2004-10-23 15:40:00 1656

原创如何消除textarea右边的Scrollbar

1、textarea { overflow: hidden; z-index: y; clip: rect( )}--> 2、Untitled Documenttextarea { overflow: hidden; z-index: y; clip: rect( ); border-style: soli

2004-10-23 15:38:00 3182

原创网吧在线破解

→ 网吧在线破解我的电脑网上邻居我的文档控制面版回收站进入C盘进入D盘进入E盘

2004-10-21 23:37:00 5501 20

原创 VBS设置打印页眉

dim hkey_root,hkey_path,hkey_key hkey_root="HKEY_CURRENT_USER" hkey_path="/Software/Microsoft/Internet Explorer/PageSetup" //设置网页打印的页眉页脚为空 function pagesetup_null() on error resume next Set

2004-10-21 23:36:00 1935

原创 CSS中text-overflow的运用

在我们编写BS的应用程序中，有时我们想将数据库中的数据以表格方式显示出来，可是里面的数据长度不一致。为了美观，很多的网站以省略号的方式显示内容。我看过很多的网站都是自己先取出相同长度的数据，然后再加省略号。其实在CSS中text-overflow就可以解决这个问题。语法：text-overflow : clip | ellipsis 取值：clip :默认值。

2004-10-21 17:06:00 3335 1

原创 VBA中的一些代码

让OFFICE能识别文档中的文字如果要让此程序能运行，要添加EXCEL的引用，只有EXCEL才有此功能Sub SpeakIt() Set x = New Excel.Application x.Speech.Speak (ActiveWindow.Selection) Set x = NothingEnd Sub让PPT能随机出题。Slides 一个代表指定演示文稿中所有幻

2004-10-20 12:54:00 1748

原创 VB6判断某一个连接是否保存在Cache中下

Public Function GetCacheEntryInfo(ByVal hWnd As Long, ByVal lpszUrl As String) As Boolean Dim dwEntrySize As Long Dim lpCacheEntry As INTERNET_CACHE_ENTRY_INFO Dim dwTemp As Long Dim lErr As Long If (

2004-10-20 12:35:00 1489

原创 VB6实现网络连通检测

Private Sub Form_Load() If IsConnected = TRUE Then MsgBox (“您已经连通了Internet!”) End If If IsConnected = FALSE Then MsgBox (“您还没有连通 Internet!”) End If End Sub 　 Option Explicit /＊有关的API声明和定义＊/ Public Dec

2004-10-20 12:32:00 4042

原创 IT有为青年怎么解决个人问题

　　今天中午吃饭的时候，和几个同事聊天。一哥们早些时候在一间上了网的婚介公司做程序员(姑且称他为小A吧)，那间公司经常有那么些个20岁出头的漂亮MM来征友，做为公司的技术主力，他经常要做一些“接待”工作----搜索公司的数据库，"现场"配对什么的。有一天来了个20岁的小姑娘，生得这个还算是中人之姿，听说这间婚介还具有网络“背景”，具有庞大的“人才”数据库云云，一进门，刚填好表就往那小A那去了小A问

2004-10-20 12:26:00 9600 29

原创 12个反对MM穿吊带裙的理由

----首先声明，我绝对不是色狼，也不是在偷看你！　　1、你明明知道我是近视眼，可你还坚持要穿——所以反对　　2、因为你比我高，我只能望见珠穆朗玛峰，却不能俯视科罗拉多大峡谷——所以反对　　 3、在我骑自行车的时候，请你不要去拣地上的书，因为我已经和垃圾桶KISS两次了，修车费太贵——所以反对　　4、而我在你面前故意扔了n次面值为5元、10元、20元的RMB，还有一次是吐血的50元

2004-10-20 12:19:00 1364

原创独立存储区的使用

独立存储区是位于硬盘上的一个分区。可以确保让其他应用程序无法查看你的文件.using System.IO.IsolatedStorage;IsolatedStorageFile isoStore=IsolatedStorageFile.GetStore(IsolatedStorageScope.Assembly|IsolatedStorageScope.User,null,null);string

2004-10-19 17:29:00 1502

原创 .NET 中基于internet的部署

要使用此部署，客户机必须有.net framework 并且要有一个internet连接.此外，用于部署的系统必须是一个安装有.net 和iis 的web服务器被部署的应用程序放在服务器上的一个目录中，可以用一个url来定位。然后，应用程序可以通过以下二种方式之一来启动：在WEB页面上单击指向服务器上应用程序的启动EXE的链接。使用一个小“启动程序”应用程序指向服务器上的主应用程序。这个启动程序实

2004-10-19 17:10:00 1308

原创数据库表中对各字段的描述的内容

在我们做代码生成器的时候通常想将字段的描述作为对象的属性描述来处理。如果来取得字段的描述呢。其实我们可以使用SQL SERVER内部函数实现SELECT *FROM ::fn_listextendedproperty (NULL, user, dbo, table, 表名, column, default) 请在查询分析器中执行，其中的“表名”是数据库的表名

2004-10-19 16:38:00 4638

原创 SQL Server编程经验技巧

１、使用ＯＵＴＰＵＴ类型参数的存储过程的技巧一般的存储过程都是直接返回一段记录集给调用者，但是有的时候我们只需要一些存储过程返回的一些参数的值，这时候可以指定存储过程的ＯＵＴＰＵＴ参数，比如：　　Ｃｒｅａｔｅ　ｐｒｏｃｅｄｕｒｅ　ＧｅｔＮａｍｅ　　　＠ｕｉｄ　ｎｖａｒｃｈａｒ（１），　　＠ｕｓｅｒｎａｍ　ｎｖａｒｃｈａｒ（１０）＝＇＇　ｏｕｔｐｕｔ　　ＡＳ　　ｓｅｔ　＠ｕ

2004-10-19 16:35:00 1995