分类：经验技巧

PHP处理Word转PDF的方法

2010/12/17 by G0dspeed·0评论

　　我们知道，PHP语言的合理运用可以帮助我们实现导出Word文档的功能。今天我们将为大家介绍PHP处理Word转PDF的相关实现方法。

　　PHP处理Word转PDF代码示例:

PHP代码

<?php
set_time_limit(0);
function MakePropertyValue($name,$value,$osm){
$oStruct = $osm->Bridge_GetStruct
("com.sun.star.beans.PropertyValue");
$oStruct->Name = $name;
$oStruct->Value = $value;
return $oStruct;
}
function word2pdf($doc_url, $output_url){
$osm = new COM("com.sun.star.ServiceManager")
or die ("Please be sure that OpenOffice.org
is installed.
");
$args = array(MakePropertyValue("Hidden",true,$osm));
$oDesktop = $osm->createInstance("com.sun.star
.frame.Desktop");
$oWriterDoc = $oDesktop->loadComponentFromURL
($doc_url,"_blank", 0, $args);
$export_args = array(MakePropertyValue
("FilterName","writer_pdf_Export",$osm));
$oWriterDoc->storeToURL($output_url,$export_args);
$oWriterDoc->close(true);
}
$output_dir = "D:/LightTPD/htdocs/";
$doc_file = "D:/LightTPD/htdocs/2.doc";
$pdf_file = "2.pdf";
$output_file = $output_dir . $pdf_file;
$doc_file = "file:///" . $doc_file;
$output_file = "file:///" . $output_file;
word2pdf($doc_file,$output_file);
?>

支持IE和Firefox的右下角弹窗js代码

2010/12/06 by G0dspeed·2条评论

* 在支持position:fixed的浏览器上使用position:fixed，这样当拖动共同条的时候弹窗位置是固定的。
* 优化了IE6下onscroll 事件绑定的函数

还需改进的地方（过段事件等项目应用的时候会修改）：

* 30秒后自动关闭
* 方便的插入弹出内容

JavaScript代码

var RBMessage={
boxW:200,
boxH:101,
init:function(){
var that = this;
this.createBox();
document.getElementById("msg_close").onclick = function() {
that.BoxWin.style.display="none";
}
},
bind: function() { //绑定窗口滚动条与大小变化事件
var that = this,
st, rt;
window.onscroll = function() {
if( !!window.ActiveXObject && !window.XMLHttpRequest ){
clearTimeout(st);
clearTimeout(that.timer2);
that.setOpacity(0);
st = setTimeout(function() {
that.BoxWin.style.top = that.getY().top;
that.show();
},500);
}
};
window.onresize = function(){
if (!!window.ActiveXObject && !window.XMLHttpRequest) {
clearTimeout(rt);
rt = setTimeout(function(){
that.BoxWin.style.top = that.getY().top
}, 100);
}
}
},
show: function() { //渐显
clearInterval(this.timer2);
var that = this,
fx = this.fx(0, 100, 0.1),
t = 0;
this.timer2 = setInterval(function() {
t = fx();
that.setOpacity(t[0]);
if (t[1] == 0) {
clearInterval(that.timer2)
}
},
10);
},
fx: function(a, b, c) { //缓冲计算
var cMath = Math[(a – b) > 0 ? "floor": "ceil"],
c = c || 0.1;
return function() {
return [a += cMath((b – a) * c), a – b]
}
},
setOpacity: function(x) { //设置透明度
var v = x >= 100 ? ‘‘: ‘Alpha(opacity=‘ + x + ‘)‘;
this.BoxWin.style.visibility = x < = 0 ? ‘hidden‘: ‘visible‘; //IE有绝对或相对定位内容不随父透明度变化的bug
this.BoxWin.style.filter = v;
this.BoxWin.style.opacity = x / 100;
},
getY: function() { //计算移动坐标
var d = document,
b = document.body,
e = document.documentElement;
var s = Math.max(b.scrollTop, e.scrollTop);
var h = /BackCompat/i.test(document.compatMode) ? b.clientHeight: e.clientHeight;
var h2 = this.BoxWin.offsetHeight;
return {
foot: s + h + h2 + 2 + ‘px‘,
top: s + h – h2 – 2 + ‘px‘
}
},
moveTo: function(y) { //移动动画
clearInterval(this.timer);
var that = this;
var moveTopNum=-that.boxH;
this.timer = setInterval(function() {
moveTopNum+=5;
that.BoxWin.style.bottom = moveTopNum +‘px‘;
if (moveTopNum >= 0) {
clearInterval(that.timer);
that.bind();
}
},50);
return this;
},
createBox:function(){
this.BoxWin=document.createElement(‘div‘);
this.BoxWin.style.width = this.boxW+"px";
this.BoxWin.style.height = this.boxH+"px";
this.BoxWin.style.bottom = – this.boxH+"px";
this.BoxWin.id = "msg_win";
this.BoxWin.innerHTML = ‘<div class="icos"><a href="javascript:void 0" title="关闭" id="msg_close">X</a></div><div id="msg_title">温馨提示(标题)</div><div id="msg_content"></div>‘;
document.body.appendChild(this.BoxWin);
var that = this;
setTimeout(function() { //初始化最先位置
that.BoxWin.style.display = ‘block‘;
that.moveTo();
},1000);
return this;
}
};
RBMessage.init();

XP、2003换Key的办法 [ENG]

2010/11/17 by G0dspeed·0评论

手工法：

Click Start, click Run, type regedit, and then click OK.

In the left pane, locate and then click the following registry subkey:
HKEY_LOCAL_MACHINESoftwareMicrosoftWindowsNTCurrent VersionWPAEvents
In the right pane, right-click OOBETimer, and then click Modify.
Change at least one digit of the OOBETimer value to deactivate Windows.
Click Start, click Run, type the following command, and then click OK:
%systemroot%system32oobemsoobe.exe /a
Click Yes, I want to telephone a customer service representative to activate Windows, and then click Next.
Click Change Product key, type the new product key in the New key boxes, and then click Update.

Note If the previous Activation Wizard screen appears again, click Remind me later, and then restart the computer.
Repeat steps 6 and 7 to verify that Windows is started. Click OK when you receive the following message:
Windows is already activated. Click OK to exit.
Install any Windows service packs that you want to install.

Note If you cannot restart Windows after you install a service pack, press F8 when you restart the computer, click Last Known Good Configuration, and then repeat this procedure.

脚本法：

ChangeVLKeySP1.vbs

ASP/Visual Basic代码

‘
‘ WMI Script – ChangeVLKey.vbs
‘
‘ This script changes the product key on the computer.
‘
‘***************************************************************************
ON ERROR RESUME NEXT
if Wscript.arguments.count<1 then
Wscript.echo "Script can‘t run without VolumeProductKey argument"
Wscript.echo "Correct usage: Cscript ChangeVLKey.vbs ABCDE-FGHIJ-KLMNO-PRSTU-WYQZX"
Wscript.quit
end if
Dim VOL_PROD_KEY
VOL_PROD_KEY = Wscript.arguments.Item(0)
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") ‘remove hyphens if any
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
result = Obj.SetProductKey (VOL_PROD_KEY)
if err <> 0 then
WScript.Echo Err.Description, "0x" & Hex(Err.Number)
Err.Clear
end if
Next

ChangeVLKey2600.vbs

ASP/Visual Basic代码

‘
‘ WMI Script – ChangeVLKey.vbs
‘
‘ This script changes the product key on the computer.
‘
‘***************************************************************************
ON ERROR RESUME NEXT
if Wscript.arguments.count<1 then
Wscript.echo "Script can‘t run without VolumeProductKey argument"
Wscript.echo "Correct usage: Cscript ChangeVLKey.vbs ABCDE-FGHIJ-KLMNO-PRSTU-WYQZX"
Wscript.quit
end if
Dim VOL_PROD_KEY
VOL_PROD_KEY = Wscript.arguments.Item(0)
VOL_PROD_KEY = Replace(VOL_PROD_KEY,"-","") ‘remove hyphens if any
Dim WshShell
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegDelete "HKLMSOFTWAREMicrosoftWindows NTCurrentVersionWPAEventsOOBETimer" ‘delete OOBETimer registry value
for each Obj in GetObject("winmgmts:{impersonationLevel=impersonate}").InstancesOf ("win32_WindowsProductActivation")
result = Obj.SetProductKey (VOL_PROD_KEY)
if err <> 0 then
WScript.Echo Err.Description, "0x" & Hex(Err.Number)
Err.Clear
end if
Next

Win7 Concurrent Remote Desktop Patch

2010/09/17 by G0dspeed·0评论

更新这个Win7的RDP补丁

用了这个以后，Win7就可以多人同时用远程桌面登录了。

附件:win7rdp.zip(536897 Byte)

告诉你用Gmail拨国内电话双方均免费的方法 [转]

2010/09/17 by G0dspeed·4条评论

我们知道使用 Gmail 给美国和加拿大拨打电话是完全免费的，现在 Google 则再一次震撼到了我们！只要使用 Gmail 拨打国内电话，通话双方均全部免费！

操作的步骤如下：

１、确保登录 Gmail 后可以看到在 Chat 列表中看到 "Call phone"按钮。这有2个方法：

其一、使用美国或加拿大 IP 地址登录 Gmail 肯定能看到该按钮；
其二、把 Gmail 语言设置成 US English ，也是有可能使用到呼叫功能的。

2、安装 Gmail voice and video chat 浏览器插件。

3、点击"Chat"列表中的"Call phone"按钮，拨打你自己的 Google Voice 手机号，如：(111) 222-333

4、听到 Google Voice 语音提示：“您当前没有新的消息，按“2”健拨打电话，按“4”健更改设置”。我们按“2”健。

5、再次听到 Google Voice 语音提示：“请按键输入您要拨打的电话号码，按“#”号健确认。如果是国际长途，则请先按键“011”，再输入国家号，最后输入电话号码”。

举2个例子：

如果我要拨打的中国移动手机号为：13866667777，则我应按键输入：0118613866667777#
如果我要拨打的国内固定电话号码为：021-77778888，则我应按键输入：011862177778888#（注：21为上海区号，大家不要输入021，这是错误的。）

6、再次听到 Google Vocie 语音提示：“这是一个免费电话！”，接下来电话就直接接通了呢。

这么大的好事，大家赶紧自己动手试试吧！

常用路由器默认密码集合

2010/08/11 by G0dspeed·0评论

常用路由器默认密码集合

　　艾玛 701g

　　用户名：admin 密码：admin

　　用户名：SZIM 密码：SZIM

　　艾玛701H

　　用户名：admin 密码：epicrouter

　　Adsl Router

　　用户名：anonymous 密码：12345

　　华为 MT800

　　用户名：admin 密码：admin

　　Home Gateway

　　用户名：user 密码：password

　　Viking:

　　用户名：root 密码：root

　　TP-link

　　用户名：admin 密码：admin

　　实达2110EH ROUTER

　　用户名：user 密码：password

　　用户名：root 密码：grouter

　　神州数码/华硕：

　　用户名：adsl 密码：adsl1234

　　全向：

　　用户名：root 密码：root

　　普天/大亚：

　　用户名：admin 密码：dare

　　UT斯达康

　　用户名：admin 密码：dare

　　e-tek

　　用户名:admin 密码:12345

　　zyxel

　　用户名:anonymous 密码:1234

　　北电

　　用户名:anonymous 密码:12345

　　大恒

　　用户名：admin 密码：admin

　　大唐

　　用户名：admin 密码：1234

　　斯威特

　　用户名：root 密码：root

　　用户名：user 密码：user

　　中兴

　　用户名：adsl 密码：adsl831 (中兴的adsl的密码前面为adsl，后面为型号,比如中兴831，密码就是adsl831)

　　成都天逸用户名：admin 密码：epicrouter

　　上海中达用户名：(随意) 密码：12345

　　品牌：ViKing

　　用户名:adsl 密码:adsl1234

　　品牌：实达

　　版本：2110ehr v3.20、 2110ehr v3.21、 2110ehr v3.51

　　用户名：admin 密码：conexant

　　版本：2110ehr v4.5

　　用户名：root 密码：grouter

　　版本：2110eh v3.51(中文web界面)

　　用户名：admin 密码：starnetadsl

　　品牌：艾玛

　　用户名：admin 密码：admin

　　品牌：神州数码/华硕

　　用户名：adsl 密码：adsl1234

　　品牌：全向

　　用户名：root 密码：root

　　品牌：普天

　　用户名：putian 密码：123456

　　品牌：e-tek

　　用户名:admin 密码:12345

　　品牌：zyxel

　　用户名:anonymous密码:1234

　　品牌：北电

　　用户名:anonymous 密码:12345

　　品牌：大恒

　　用户名：admin 密码：admin

　　品牌：大唐

　　用户名：admin 密码：1234

　　品牌：斯威特

　　用户名：root 密码：root

　　用户名：user 密码：user

　　品牌：中兴

　　用户名：adsl 密码：adsl831

　　品牌：BENQ

　　用户名：user 密码：benq1234

　　品牌：华硕

　　用户名：ADSL 密码：adsl1234

　　艾玛 701g

　　192.168.101.1 192.168.0.1

　　用户名：admin 密码：admin

　　用户名：SZIM 密码：SZIM

　　艾玛701H

　　用户名：admin 密码：epicrouter

1. 将服务器类型更改为 NTP。为此，请按照下列步骤操作：
a.  单击“开始”，单击“运行”，键入 regedit，然后单击“确定”。
b.  找到并单击下面的注册表子项：
HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesW32TimeParametersType
c.  在右窗格中，右键单击“Type”，然后单击“修改”。
d.  在“编辑值”的“数值数据”框中键入 NTP，然后单击“确定”。

2. 将 AnnounceFlags 设置为 5。为此，请按照下列步骤操作：
a.  找到并单击下面的注册表子项：
HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesW32TimeConfigAnnounceFlags
b.  在右窗格中，右键单击“AnnounceFlags”，然后单击“修改”。
c.  在“编辑 DWORD 值”的“数值数据”框中键入 5，然后单击“确定”。

3. 启用 NTPServer。为此，请按照下列步骤操作：
a.  找到并单击下面的注册表子项：
HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesW32TimeTimeProvidersNtpServer
b.  在右窗格中，右键单击“Enabled”，然后单击“修改”。
c.  在“编辑 DWORD 值”的“数值数据”框中键入 1，然后单击“确定”。

进服务-停止windows time 服务，再启动windows time  服务。这样时间服务器就配置完毕
客户机设置：
册表项 MaxPosPhaseCorrection
路径 HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesW32TimeConfig
十进制修改为999999999
注册表项 MaxNegPhaseCorrection
路径 HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesW32TimeConfig
十进制修改为999999999
上面2项修改意思为：可以同步时间超过31年的时间差。因为XP默认为15小时，超过15小时差就不给自动更新时间。
注册表项 NtpServer
路径 HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesW32TimeParameters
十进制修改为192.168.*.* （服务器地址)
注册表项 SpecialPollInterval
路径HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesW32TimeTimeProvidersNtpClient
修改为600  意思为10分钟自动更新时间一次  默认为7天更新一次
进服务-停止windows time 服务，再启动windows time  服务。客户机设置完毕！

SQL Server中删除重复数据的几个方法

2010/05/25 by G0dspeed·0评论

数据库的使用过程中由于程序方面的问题有时候会碰到重复数据，重复数据导致了数据库部分设置不能正确设置……

方法一

declare @max integer,@id integer
declare cur_rows cursor local for select 主字段,count(*) from 表名 group by 主字段 having count(*) > 1
open cur_rows
fetch cur_rows into @id,@max
while @@fetch_status=0
begin
select @max = @max -1
set rowcount @max
delete from 表名 where 主字段 = @id
fetch cur_rows into @id,@max
end
close cur_rows
set rowcount 0

方法二

有两个意义上的重复记录，一是完全重复的记录，也即所有字段均重复的记录，二是部分关键字段重复的记录，比如Name字段重复，而其他字段不一定重复或都重复可以忽略。

1、对于第一种重复，比较容易解决，使用

select distinct * from tableName

就可以得到无重复记录的结果集。

如果该表需要删除重复的记录（重复记录保留1条），可以按以下方法删除

select distinct * into #Tmp from tableName
drop table tableName
select * into tableName from #Tmp
drop table #Tmp

发生这种重复的原因是表设计不周产生的，增加唯一索引列即可解决。

2、这类重复问题通常要求保留重复记录中的第一条记录，操作方法如下

假设有重复的字段为Name，Address，要求得到这两个字段唯一的结果集

select identity(int,1,1) as autoID, * into #Tmp from tableName
select min(autoID) as autoID into #Tmp2 from #Tmp group by Name,autoID
select * from #Tmp where autoID in(select autoID from #tmp2)

最后一个select即得到了Name，Address不重复的结果集（但多了一个autoID字段，实际写时可以写在select子句中省去此列）

微软随SharePoint Designer赠送Office2007激活KEY? [转]

2010/05/25 by G0dspeed·0评论

早晨打开CB，看到微软免费发行SharePoint Designer的新闻，由于公司使用的是正版的Office，所以对新闻提供的下载并不怎么感兴趣，真正感兴趣的是官方下载页面同时提供了一个安装KEY。按以往经验来分析，一般Office2007各个单独组件所使用的KEY是通用的，也就是说安装SharePoint Designer的KEY完全可以用来安装Project、Visio等。

按网上广泛流传的更换Office2007KEY的方法，打开注册表编辑器，定位到
HKEY_LOCAL_MACHINESOFTWAREMicrosoftOffice12.0Registration {90120000-003B-0000-0000-0000000FF1CE}项，

“{90120000-003B-0000-0000-0000000FF1CE}”项可能会因为安装的产品版本不同而有所不同，我们用的是 “Project Professional 2007”，该注册表项下“ProductName”值是“Microsoft Office Project Professional 2007”，将“DigitalProductID”改名或删除，之后启动Project会要求输入序列号，输入微软提供的 KEY“JB28C2GKFM3W9G3V8XMGQBYYB”，如果版本一致的话KEY的输入框后边会出现绿色的对勾，之后会执行一个安装步骤。安装完毕后，重新启动Project，在“帮助”菜单下选择“激活产品”，此时会提示“此产品已被经激活”。

当然激活只是一方面，目前还没有测试是否能通过正版验证，理论上微软如果封堵这个KEY也是很容易的。

G0dspeed's Blog

Stay hungry, stay foolish

分类：经验技巧

PHP处理Word转PDF的方法

支持IE和Firefox的右下角弹窗js代码

XP、2003换Key的办法 [ENG]

ChangeVLKey2600.vbs

Win7 Concurrent Remote Desktop Patch

告诉你用Gmail拨国内电话双方均免费的方法 [转]

常用路由器默认密码集合

创建2003下的NTP SERVER

SQL Server中删除重复数据的几个方法

推荐8款PHP建站软件【转】

微软随SharePoint Designer赠送Office2007激活KEY? [转]

分类： 经验技巧

ChangeVLKey2600.vbs

分类：经验技巧