返回一个 UsedObjects 集合后，便可用 Count 属性来确定 Microsoft Excel 应用程序中所用对象的个数。 在本示例中，Microsoft Excel 确定已分配的对象的个数，并通知用户。本示例假定在应用程序中执行重新计算，并且在完成前中断重新计算。 复制代码 代码如下: Sub CountUsedObjects() MsgBox "The number of use

其他编程 2024年02月08日  56

< %@ LANGUAGE="VBscript" % >< % RequestName = Request.Form("Name")RequestLeaveMeAlone = Request.Form("LeaveMeAlone")If RequestName < >"" or RequestLeaveMeAlone < >"" then ' 在同一个

其他编程 2024年02月04日  40

然后就可以免费接受到其他同学发的短信了,当然….鄙人不是这样的人. 其实,鄙人更邪恶.这个飞信命令行工具实在是太牛X了.只要输入! 复制代码 代码如下: sms.exe 飞信号码(多个飞信号用逗号分隔) 短信内容 程序即可自动调用偶架设的飞信短信网关来发送短信了, 可惜的是接收的飞信用户必须加我的飞信ID为好友.还算不错, 给公司内部做个短信群发通知还是很8错的. 今天翻阅网上的文章,忽然

其他编程 2024年02月02日  63

rs.open sql,conn：如果sql是delete,update,insert则会返回一个关闭的记录集，在使用过程中不要来个rs.close在文件最后再写rs.close 中间可以来多个记录集rs1.open sql1,conn，最后一块关闭记录集:rs.close rs1.close conn.execute(sql) 如果sql是delete,update,insert则会返回一个

其他编程 2024年01月31日  66

范例代码 function BytesToBstr(body,Cset) dim objstream set objstream = Server.CreateObject("adodb.stream") objstream.Type = 1 objstream.Mode =3 objstream.Open objstream.Write body obj

其他编程 2024年01月30日  92

相关术语： DB ：数据库：在硬盘上以文件的方式存在DBMS：数据库管理系统：例如mysql，oracle，sqlserver…SQL：一门适用于所有DBMS，对DB进行操作的标准规划语言，DQL：数据库查询语句 select,DML：数据库管理语句，修改表中数据update,insert,delete,DDL：数据库管理语句，修改表中的结构drop,create,alter,TCL：commi

其他编程 2024年01月24日  72

复制代码 代码如下: if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[ob_calendar]') and OBJECTPROPERTY(id, N'IsProcedure') = 1) drop procedure [dbo].[ob_calendar] GO if exists (selec

其他编程 2024年01月23日  45

【方案一】比较原始的方法，思路比较容易理解。 @echo off ::Batcher@bbs.bathome.net ::2009-03-04 ::命令行窗口自动居中之批处理版@CMD@XP ::http://bbs.bathome.net/thread-3582-1-1.html setlocal enabledelayedexpansion ::指定命令行窗口字体大小（默认是8*

其他编程 2024年01月21日  68

今天小编给大家分享一下shell怎么通过sed上下两行合并成一行的相关知识点，内容详细，逻辑清晰，相信大部分人都还太了解这方面的知识，所以分享这篇文章给大家参考一下，希望大家阅读完这篇文章后有所收获，下面我们一起来了解一下吧。 一、shell上下两行 1.file cat file.txt host1 192.168.0.1 host2 192.168.0.2 host3 192.16

其他编程 2024年01月15日  46

方法一：Wscript.ScriptFullName '创建一个 Wscript.Shell 对象的实例,稍后会使用这个对象启动 Windows 资源管理器 Set objShell = CreateObject("Wscript.Shell") '获取脚本的路径 strPath = Wscript.ScriptFullName Set objFSO = CreateObject

其他编程 2023年12月22日  64