2020年3月18日 星期三

Win10搜尋不到IE

Win10搜尋不到IE

在Win10 1903版本內

1、點放大鏡搜尋IE,找不到IE瀏覽器。

2、利用開Edge的方式另開啟IE,Edge另上設定→更多功具→使用Internet Explorere開啟。
結果...Edge版本是最新版 (Microsoft Edge v80.0 瀏覽器),無法呼叫出IE。

解決方式:
1、官網下載IE11,下載安裝一直要求重開機,鬼打牆。失敗!瞎.......

2、正確解決方式如下:
*左下→開始功能表→滑鼠右鍵→應用程式與功能





*管理選用功能


*先解除安裝IE,移除後再點新增功能,把IE再安裝回,然後重開機生效後...收工。









2020年3月1日 星期日

Win10難用,修改回win7的習慣!(相片檢示器、小畫家)

1、win10改win7 圖片預覽模式(Win10改回Windows相片檢示器)

桌面→右鍵→新增→文字文件→貼以下內容→存檔→改檔案名稱"PhotoViewer.reg"
→接下來點兩下執行→重開機。完成!

------------------------------------------------------------------------------------

Windows Registry Editor Version 5.00
; Change Extension's File Type
[HKEY_CURRENT_USER\Software\Classes\.jpg]
@="PhotoViewer.FileAssoc.Tiff"
; Change Extension's File Type
[HKEY_CURRENT_USER\Software\Classes\.jpeg]
@="PhotoViewer.FileAssoc.Tiff"
; Change Extension's File Type
[HKEY_CURRENT_USER\Software\Classes\.gif]
@="PhotoViewer.FileAssoc.Tiff"
; Change Extension's File Type
[HKEY_CURRENT_USER\Software\Classes\.png]
@="PhotoViewer.FileAssoc.Tiff"
; Change Extension's File Type
[HKEY_CURRENT_USER\Software\Classes\.bmp]
@="PhotoViewer.FileAssoc.Tiff"
; Change Extension's File Type
[HKEY_CURRENT_USER\Software\Classes\.tiff]
@="PhotoViewer.FileAssoc.Tiff"
; Change Extension's File Type
[HKEY_CURRENT_USER\Software\Classes\.ico]
@="PhotoViewer.FileAssoc.Tiff"

------------------------------------------------------------------------------------

2、Win10小畫家3D難用死了,呼叫傳統小畫家方法。

1. 按下「Win + R」打開執行對話窗,輸入mspaint

2.在工具列小畫家圖示上按右鍵,選擇「釘選到工作列」,方便以後開啟囉!


2018年7月23日 星期一

excel 巨集密碼破解

excel →巨集→錄製巨集   跳出要密碼。
破解方式如下:

1、開新excel
2、alt+f11 叫出vba
3、右鍵→插入→模組
4、貼上代碼
5、執行→選擇要破解excel →跳出破解提示。完成!

----------------------------------------------------------------------------

Private Sub VBAPassword() '你要解保护的Excel文件路径
Filename = Application.GetOpenFilename("Excel文件(*.xls & *.xla & *.xlt),*.xls;*.xla;*.xlt", , "VBA破解")
If Dir(Filename) = "" Then
MsgBox "没找到相关文件,清重新设置。"
Exit Sub
Else
FileCopy Filename, Filename & ".bak" '备份文件。
End If
Dim GetData As String * 5
Open Filename For Binary As #1
Dim CMGs As Long
Dim DPBo As Long
For i = 1 To LOF(1)
Get #1, i, GetData
If GetData = "CMG=""" Then CMGs = i
If GetData = "[Host" Then DPBo = i - 2: Exit For
Next
If CMGs = 0 Then
MsgBox "请先对VBA编码设置一个保护密码...", 32, "提示"
Exit Sub
End If

Dim St As String * 2
Dim s20 As String * 1
'取得一个0D0A十六进制字串
Get #1, CMGs - 2, St
'取得一个20十六制字串
Get #1, DPBo + 16, s20
'替换加密部份机码
For i = CMGs To DPBo Step 2
Put #1, i, St
Next
'加入不配对符号
If (DPBo - CMGs) Mod 2 <> 0 Then
Put #1, DPBo + 1, s20
End If
MsgBox "文件解密成功......", 32, "提示"
Close #1
End Sub

------------------------------------------------------------------------------

2018年7月22日 星期日

outlook 2016 imap 沒有寄件備份

outlook 2016 沒有寄件備份,信件寄出了,寄件備份匣什麼都沒有...
webmail看寄件備份...什麼也沒有!見鬼了...

 解決方法:設規則


win10筆電內建office365及再安裝office2010。優先開啓順序問題。

新購筆電win10且內建office365,因平常習慣使用office2010。

不管改什麼設定,只要IE上有excel的連結,開啟皆跑到office365開啟。Orz

以下步驟為失敗修改方式。各位別再嘗試了。最終解決方法再最下面紅字。


嘗試(失敗)方式如下:

1、於控制台→預設程式。去修改開啟預設office2010開啟。

2、改regedit
以 Office 2010 作為預設開啟程式

適用於 Windows 7 / 64bit 指令
"C:\Program Files (x86)\Microsoft Office\Office14\excel.exe" /regserver
"C:\Program Files (x86)\Microsoft Office\Office14\powerpoint.exe" /regserver
"C:\Program Files (x86)\Microsoft Office\Office14\winword.exe" /regserver

3、移除所有的office,去微軟下載 O15CTRRemove.diagcab
單安裝office2010,不管怎麼移除office365跟鬼纏身一樣,都移除不了。
(因為在控制台→解除安裝程式內找不到office365啊!!)

 Office 官方卸載工具   下載

4、不想嚐試了............

最終解決方式。

於win10點左下開始,找到excel動態磚,滑鼠右鍵,解除安裝。解決!!






win10家庭版升級專業版


新購筆電內建Win10家庭版,拿專業版啟動序號變更版本,但是在啟用頁面輸入序號時,卻無法升級,系統僅會提示序號版本與目前安裝版本不符。


Microsoft 論壇提供

請先確定系統版本為 1511 以上,前往設定>更新與安全性>啟用>變更產品金鑰,之後輸入下列特定序號:

VK7JG-NPHTM-C97JM-9MPGT-3V66T

升級....卻失敗了!瞎~


解決方式:把網路中斷連線,再key一次序號!更新成功!

重新開機後再變更專業版產品金鑰即可。

2015年6月14日 星期日

裝置和印表機空白 及 usb無法退出

又發現一個很瞎的問題!
裝置和印表機,開啟,找很久,一直跑。找不到任何裝置。


結是是....服務Bluetooth Support Service被關閉了。
改成"自動"並"啟動"後,正常了!


很瞎的問題,且服務自己被關的很未名奇妙。


後來...又一次發現無法退出usb,點右下"安全地移除...."沒反應。
傻眼,網路上找不到任何資料,只叫你裝一些第三方移除軟體。


後來............也是相同問題,改服務後,正常了!


同樣問題如下:很重要,提了兩次。
結是是....服務Bluetooth Support Service被關閉了。
改成"自動"並"啟動"後,正常了!