KixForms.dll not found 可能權限不足

問題來源：

http://tw.knowledge.yahoo.com/question/question?qid=1609092103875

問題內容：

於解壓縮並執行P_clin的Iclean 出現說 KixForms.dll not found 可能權限不足,請以系統管理員身分執行此程式.......可是在下就是以系統管理員的權限進入VISTA的呀!

請電腦高手們指導.......... 感恩!

問題答案：

KixForms 是一個專為 KiXtart 寫的 ActiveX 元件，
可以讓一般文字輸出的 Script 語言也可以產生視窗界面，
但是不只有 KiXtart 可以使用，
一般常見的 VBScript, Jscript, Perl , Ruby …等，
只要可以使用 ActiveX 元件的 Scripts，
都可以使用 KixForms。

您可以到 KixForms 的網站下載，
有分為傳統版本：「KiXforms Classic」
及.Net版本：「KiXforms.NET」（如果您有安裝 .Net 的話）

下載完解壓縮，
可以有兩種安裝方式：

一、使用執行檔安裝：

找到「KiXforms.msi」後，
執行「KiXforms.msi」進行安裝。

二、自己註冊 dll

將「KixForms.dll」複製到「%SystemRoot%\system32 \」（一般而言，就是「C:\WINDOWS\system32\」），


開啟命令提示字元：
於「開始」→「執行」→輸入「cmd」→點擊「確定」


再輸入「regsvr32 kixforms.dll」註冊

然後再試試看問題解決了沒

KixForms 下載頁：http://www.kixforms.org/assets/index.htm
KixForms 介紹及常見問題：http://www.kixforms.org/docs/introduction.htm

幫我看這個網址的聯絡Email；(我沒有outlook)

問題來源：

http://tw.knowledge.yahoo.com/question/question?qid=1009092302820

問題內容：

http://www.doctorcher.com/frame-chinese.htm
這網址的左下角有"與我們聯絡"但是我沒有microsoft outlook所以請哪為幫我看一下Email的網址是多少
因為這問題太簡單所以我會選第一位或是第一位回答下面的加分題者@@

加分題:
沒有microsoft outlook如何看該網址Email(不能在該網址按右鍵)

問題答案：

在瀏覽器的最下面有所謂的狀態列，只要把滑鼠移到超連結上，就會秀在狀態列上
如下圖所示，可看到電子郵件信箱


開啟命令提示字元：
於「開始」→「執行」→輸入「cmd」→點擊「確定」


出現一個「命令提示字元」
如有需要記錄原先的設定值時，可先輸入「ftype MailTo」，查看設定，以後可以回復原有的設定。
然後再輸入「ftype MailTo="%ComSpec%" /k echo "%1"」


設定完成後，以後只要在瀏覽器上，點擊連絡人之類的超連結，就會跳出一個「命令提示字元」，
裡面就看得到電子郵件信箱了。

請問如何寫關於del的批次檔？

問題來源：

http://tw.knowledge.yahoo.com/question/question?qid=1509092103439

問題內容：

我有一個資料夾，會備份每天的資料，這個資料夾裡面有每天的子資料夾，格式如下：
備份資料夾=>0101、0102、0103…1231，裡面裝著每天的備份資料，但我想做一個批次檔來刪除三個月前的資料，例如：
今天9月21，我要刪掉6月21以前的備份，但我子資料夾必須留著，我要刪的只有裡面的檔案，請問各位大大，我該如何寫這樣的批次檔呢？

問題答案：

分成兩個部份來回答：

1、DelOld.cmd：

@echo off cscript /nologo ListOldFolder.vbs log > FolderList.txt for /f %%f in (FolderList.txt) do ( rd /s /q "%%f" if not exist "%%f" md "%%f" )

2、ListOldFolder.vbs：

' ************************************************************************ ' * Modification history ' * Date Level Author Description ' * ---------- ----- ------------ ------------------------------------ ' * 2009/09/23 P0.00 Eric Su Initial Release ' * ' ************************************************************************ ' Eric Su 的部落格：http://sn.im/e7q0c、http://www.pushba.com/View.aspx?gid=7a0bcaa2 ' ************************************************************************ 'Usage : ListOldFolder.vbs log_path keep_mons Const StdOut = 1 Dim objArgs, where, mons Set objArgs = WScript.Arguments where = "log" mons = 3 '讀取前二個參數，省略時，保留 3 個月資料 If objArgs.Count >= 1 Then where = objArgs(0) End If If objArgs.Count >= 2 Then mons = objArgs(1) End If DeleteFilesBymons where, mons Set objArgs = Nothing Sub DeleteFilesByMons(where, keepMons) Dim fso, folder, sf, f Dim aDay, today today = Now aDay = DateAdd("m", -keepMons, today) today = Right("00" & Month(today), 2) & Right("00" & Day(today), 2) aDay = Right("00" & Month(aDay), 2) & Right("00" & Day(aDay), 2) Set fso = CreateObject("Scripting.FileSystemObject") If fso.FolderExists(where) Then Set folder = fso.GetFolder(where) Set sf = folder.SubFolders If aDay < today Then For Each f In sf If f.Name <= aDay Or f.Name > today Then Output(f) End If Next Else For Each f In sf If f.Name <= aDay And f.Name > today Then Output(f) End If Next End If End If Set f = Nothing Set sf = Nothing Set folder = Nothing Set fso = Nothing End Sub Sub Output(where) Dim fso, sout Set fso = CreateObject("Scripting.FileSystemObject") Set sout = fso.GetStandardStream(StdOut) sout.WriteLine where.Path Set sout = Nothing Set fso = Nothing End Sub