現在買的品牌電腦大多是Windows 8或10,序號都直接寫在BIOS了,也沒有所謂的Windows 7序號貼紙。
如果要重灌系統,除了用還原光碟外,還有一種做法,就是手動備份證書和啟動檔。
複製以下兩個檔
%windir%\System32\spp\tokens\pkeyconfig\pkeyconfig.xrm-ms
%windir%\ServiceProfiles\NetworkService\AppData\Roaming\Microsoft\SoftwareProtectionPlatform\tokens.dat
備份啟用序號
使用 AIDA64 軟體 於作業系統\作業系統\產品金鑰
複製金鑰
使用Windows安裝光碟安裝,不要輸入序號,不要使用線上自動啟動。
重灌完後,使用WinPE將上面的證書和啟動檔複蓋回去
輸入備份出來的啟用序號,再執行線上啟用即可。
懶人作業
使用ABR Beta
http://directedge.us/content/abr-activation-backup-and-restore
下載ABRbeta.exe ,執行後會解壓縮成ABR目錄
重灌前先執行activation_backup.exe
產生backup-cert.xrm-ms證書文件和backup-key序號檔
重灌完成後,執行actvation_restore.exe
就可以還原成OEM的啟動狀態了。
2015年10月27日 星期二
2015年9月15日 星期二
CMD 使用 FOR 取得檔案日期屬性,星期幾
以下CMD指令為,判斷當前目錄下 所有7z壓縮,且建立日期為週一的檔案,做移動到特定目錄。
因為以下指令會需要星期幾的屬性,所以需先至以下地方,修改日期屬性
控制台→地區→其它設定→日期→簡短日期
將預設 YYYY/MM/dd 修改為 YYYY/MM/dd ddd
REM 設定移動的目的地
SET _PATH="E:\BACKUP"
REM 以下為同一行指令,為了方便修改和查看,用 ^ 做換行的動作。
FOR /F "delims==" %%a IN ('dir /s /b *.7z') DO ^
FOR /F "tokens=2" %%b IN ("%%~ta") DO ^
IF "%%b"=="週一" ^
FOR /F "tokens=2 delims=:" %%c IN ("%%a") DO ^
move %%a %_PATH%%%c
因為以下指令會需要星期幾的屬性,所以需先至以下地方,修改日期屬性
控制台→地區→其它設定→日期→簡短日期
將預設 YYYY/MM/dd 修改為 YYYY/MM/dd ddd
REM 設定移動的目的地
SET _PATH="E:\BACKUP"
REM 以下為同一行指令,為了方便修改和查看,用 ^ 做換行的動作。
FOR /F "delims==" %%a IN ('dir /s /b *.7z') DO ^
FOR /F "tokens=2" %%b IN ("%%~ta") DO ^
IF "%%b"=="週一" ^
FOR /F "tokens=2 delims=:" %%c IN ("%%a") DO ^
move %%a %_PATH%%%c
2015年6月2日 星期二
Lubuntu 12.04 安裝遠端桌面(XRDP)
當在Lubuntu 12.04上安裝XRDP後面,使用Win 8.1的遠端桌面連線
連線成功後,畫面會出來花屏,看不到背景和其它圖示,只剩滑鼠有作用
經上網查詢後,應是預設的桌面執行環境的問題。
以下為安裝過程
'安裝xrdp,裝完就可以連線,但連線成看到的是花屏
sudo apt-get -y install xrdp
'再執行以下這行後,重新連線如果還是花屏,重開Lubuntu應該就可以了。
echo "lxsession -s Lubuntu -e LXDE" > ~/.xsession
我對Linux不熟,原理不清楚,只能依樣畫葫蘆
連線成功後,畫面會出來花屏,看不到背景和其它圖示,只剩滑鼠有作用
經上網查詢後,應是預設的桌面執行環境的問題。
以下為安裝過程
'安裝xrdp,裝完就可以連線,但連線成看到的是花屏
sudo apt-get -y install xrdp
'再執行以下這行後,重新連線如果還是花屏,重開Lubuntu應該就可以了。
echo "lxsession -s Lubuntu -e LXDE" > ~/.xsession
我對Linux不熟,原理不清楚,只能依樣畫葫蘆
2015年5月26日 星期二
Outlook VBA Outlook通訊錄
以下Outlook VBA 的作用在於將特定目錄下的連絡人資料夾,顯示為電子郵件通訊錄
Sub ContactsFolder()
Dim myNameSpce As Outlook.NameSpace
Dim mySourFolder, myDestFolder As Outlook.MAPIFolder
Dim thisFolder As Outlook.MAPIFolder
Dim uName As String
Set myNameSpace = Application.GetNamespace("MAPI")
myNameSpace.AddStore "D:\Mail\通訊錄.pst" '開啟預設通訊錄檔案
Set mySourFolder = myNameSpace.Folders("通訊錄").Folders("G-SPEC 連絡人") '來源資料檔"收件匣"物件
For i = 1 To mySourFolder.Folders.Count
Set thisFolder = mySourFolder.Folders(i)
If thisFolder.ShowAsOutlookAB = False Then '判斷是否未選擇顯示該連絡人目錄
thisFolder.ShowAsOutlookAB = True '將此資料夾顯示為電子郵件通訊錄
MsgBox ("顯示通訊錄 " & thisFolder.Name)
End If
Next i
Set myNameSpace = Nothing
End Sub
Sub ContactsFolder()
Dim myNameSpce As Outlook.NameSpace
Dim mySourFolder, myDestFolder As Outlook.MAPIFolder
Dim thisFolder As Outlook.MAPIFolder
Dim uName As String
Set myNameSpace = Application.GetNamespace("MAPI")
myNameSpace.AddStore "D:\Mail\通訊錄.pst" '開啟預設通訊錄檔案
Set mySourFolder = myNameSpace.Folders("通訊錄").Folders("G-SPEC 連絡人") '來源資料檔"收件匣"物件
For i = 1 To mySourFolder.Folders.Count
Set thisFolder = mySourFolder.Folders(i)
If thisFolder.ShowAsOutlookAB = False Then '判斷是否未選擇顯示該連絡人目錄
thisFolder.ShowAsOutlookAB = True '將此資料夾顯示為電子郵件通訊錄
MsgBox ("顯示通訊錄 " & thisFolder.Name)
End If
Next i
Set myNameSpace = Nothing
End Sub
2015年3月26日 星期四
微軟新注音2010無法選字 For Windows XP
最近同事反映微軟新注音2010在某些地方會無法選字
以下是解決辦法
一、滑鼠移到輸入法圖示上按右鍵→設定值
二、於 "文字服務和輸入語言" 視窗中點選 "進階 "
三、勾選 相容性設定 中的 "延伸對所有程式的進階文字服務支援"
四、重開機後就正常了。
以下是解決辦法
一、滑鼠移到輸入法圖示上按右鍵→設定值
二、於 "文字服務和輸入語言" 視窗中點選 "進階 "
三、勾選 相容性設定 中的 "延伸對所有程式的進階文字服務支援"
四、重開機後就正常了。
2015年3月12日 星期四
網路磁碟上的Excel檔開啟緩慢
Office的Microsoft Office File Validation Add-in這個更新檔,會造成Excel 2003的檔案在網路磁碟機上開啟緩慢,手動移除即可。
或是用以下登錄檔,停用驗證功能
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Excel\Security\FileValidation]
"EnableOnLoad"=dword:00000000
參考來源:
https://social.technet.microsoft.com/Forums/zh-TW/5766b84f-023a-4cae-a256-78c5603c1672/windows-2008-r2excel?forum=officezhcht
http://support.microsoft.com/kb/2570623/zh-tw#FixItForMeAlwaysM3
或是用以下登錄檔,停用驗證功能
Windows Registry Editor Version 5.00
[HKEY_CURRENT_USER\Software\Microsoft\Office\11.0\Excel\Security\FileValidation]
"EnableOnLoad"=dword:00000000
參考來源:
https://social.technet.microsoft.com/Forums/zh-TW/5766b84f-023a-4cae-a256-78c5603c1672/windows-2008-r2excel?forum=officezhcht
http://support.microsoft.com/kb/2570623/zh-tw#FixItForMeAlwaysM3
2015年2月13日 星期五
Windows 8 系統還原檔(WindowsImageBackup)
參考來源:
https://social.technet.microsoft.com/Forums/zh-TW/7fb30233-4d12-4b58-9ce4-f236b3f53b8c/windows-server-backup?forum=windowsserver2008zhcht
http://ithelp.ithome.com.tw/question/10082187
Windows 7 、 Windows 8 、 Windows 8.1
上列系統安裝完成後,都可以使用內建的備份工具做系統還原點。
即產生 WindowsImageBackup 目錄,如果手動刪除了這個目錄
會造成日後要選擇還原點時,會列出不存在的還原點(因為被手動刪除了)
但系統的軟體介面並沒有提供刪除的選項,只能用指令的方式處理
注意以下方式無法指定刪除的還原點,只能全刪除再重新做還原點
開啟cmd視窗,輸入以下指令
'清除所有的類別目錄(備份檔目錄要手動刪除)
wbadmin delete catalog
舊的備份還原點,需手動刪除。
'下面的指令會備份 C: 磁碟機,而備份的資料會存放在 E: 磁碟機,使用 -quiet 參數,是不希望使用者介入:
wbadmin start backup -backupTarget:e: -include:c: -quiet
https://social.technet.microsoft.com/Forums/zh-TW/7fb30233-4d12-4b58-9ce4-f236b3f53b8c/windows-server-backup?forum=windowsserver2008zhcht
http://ithelp.ithome.com.tw/question/10082187
Windows 7 、 Windows 8 、 Windows 8.1
上列系統安裝完成後,都可以使用內建的備份工具做系統還原點。
即產生 WindowsImageBackup 目錄,如果手動刪除了這個目錄
會造成日後要選擇還原點時,會列出不存在的還原點(因為被手動刪除了)
但系統的軟體介面並沒有提供刪除的選項,只能用指令的方式處理
注意以下方式無法指定刪除的還原點,只能全刪除再重新做還原點
開啟cmd視窗,輸入以下指令
'清除所有的類別目錄(備份檔目錄要手動刪除)
wbadmin delete catalog
舊的備份還原點,需手動刪除。
'下面的指令會備份 C: 磁碟機,而備份的資料會存放在 E: 磁碟機,使用 -quiet 參數,是不希望使用者介入:
wbadmin start backup -backupTarget:e: -include:c: -quiet
訂閱:
文章 (Atom)