文號轉發文字號跑不出來
目前已知asp檔有
ADAR702001.asp存取MAAOP
ADAR101072.asp存取MAA 已完成
ADAR101072_S2.asp存取MAA
ADAR201153_S.asp 存取MAA
ADBR101092_S.asp 存取MBA
ADCR101082_S2.asp 存取MCA
ADCR101082_S1.asp 存取MCAA
ADCR201082_S.asp 存取MCAA
ADCR501132_S.asp 存取MCAH
ADCR701062_S.asp 存取MCG
ADA6010003_S.asp 存取MAA
2007年12月21日 星期五
2007年12月20日 星期四
Recordset 操作
| RecordSet.BOF | 判斷指標是否超過最前面 |
| RecordSet.EOF | 判斷指標是否超過最後面 |
| RecordSet.MoveFirst | 將資料錄指標移至第一筆 |
| RecordSet.MoveLast | 將資料錄指標移至最後一筆 |
| RecordSet.MoveNext | 將資料指標往後移一筆 |
| RecordSet.MovePrevious | 將資料指標往前移一筆 |
| RecordSet.Fields.Count | 傳回Recordset中的欄位數 |
| RecordSet(i).Name | 傳回Recordset中第i個欄位的名稱 |
| RecordSet.RcordCount | 傳回Recordset中資料錄的筆數 |
| RecordSet("欄位名稱") | 傳回指定欄位名稱的資料內容 |
| RecordSet(i) | 傳回RecordSet中的第i個欄位資料 |
| RecordSet.Fields(i).DefinedSize | 傳回RecordSet中的第i個欄位資料欄位長度 |
| RecordSet.Fields(i).Type | 傳回RecordSet中的第i個欄位資料欄位資料型別 |
| RecordSet.BookMark | 傳回設定的書籤以儲存現在紀錄的位置。RecordSet.AbsolutePostition 將指標移至RecordSet中的某一筆資料上 |
| RecordSet.PageSize | 設定每頁顯示的資料筆數 |
| RecordSet.PageCount | 傳回分頁後的總頁數 |
| RecordSet.AbsolutePage | 傳回目前所在的頁數 |
| RecordSet.AddNew | 新增資料至資料表中 |
| RecordSet.Update | 更新目前這筆資料 |
| RecordSet.Delete | 刪除目前這筆資料 |
| RecordSet.Find | 尋找資料值 |
| RecordSet.GetRows | 可將Recordset中的資料儲存至陣列中 |
| RecordSet.Sort | 可將Recordset中的資料排序 |
資料來源:http://blog.blueshop.com.tw/mars/archive/2004/09/08/177.aspx
2007年11月23日 星期五
電腦中毒了Virus.Win32.Tenga.a
今天電腦掃出一堆的毒,執行檔大概都中了吧
1.病毒簡介
Worm@W32.Licum(別名:W32/Tenga.A)
Licum駭蟲透過微軟漏洞進行散播,而目前微軟只提供Windows NT 以上作業系統的修補程式,在此提供解決Windows 98 作業系統不會被感染的方法,以此作為參考。
Licum駭蟲是利用微軟DCOM RPC 介面中的緩衝區滿溢漏洞進行散播,駭蟲執行後,會感染電腦內的執行檔,而目前微軟只針對Windows NT以上的作業系統提供修補程式,而沒有提供Windows 98 作業系統的修補程式,所以使用Windows98的使用者請小心,為了避免使用Windows 98 作業系統的電腦受到感染,解決的方法如下,請修改登錄檔"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Ole" 下列的值:"EnableDCOM"="N",如果是"N"即為關閉,此時類似 NetMeeting 相關軟體會無法使用,但此方法可先關閉漏洞,以避免駭蟲入侵。
基本介紹
病毒名稱 Worm@W32.Licum
病毒別名 Backdoor.Win32.Small.gl [Kaspersky Lab], Virus.Win32.Tenga.a [Kaspersky Lab], BackDoor-CTM [McAfee], W32/Gael.worm.a [McAfee], W32/Tenga-A [Sophos], PE_TENGA.A [Trend Micro],W32.Licum[symantec]
病毒型態 Worm
病毒發現日期 2005/07/29
利用漏洞
MS03-026(英文)
MS03-026(中文)
影響平台 Windows 95/98/ME , Windows NT/2000/XP/2003
風險評估
散播程度:低
破壞程度:低
Worm@W32.Licum 行為描述:
駭蟲會下載下列檔案:
[http://]utenti.lycos.it/[REMOVED]/dl.exe
[http://]utenti.lycos.it/[REMOVED]/CBACK.EXE
[http://]utenti.lycos.it/[REMOVED]/GAELICUM.EXE
駭蟲會感染電腦內的執行檔。
駭蟲是利用微軟的漏洞進行散播病毒,而目前微軟只針對Windows NT 以上的作業系統提供修補漏洞程式,所以使用Windows 98 作業系統的用戶請小心。
請到Windows Update網站,或按[開始]→[Windows Update]
來更新你的作業系統,並安裝所有重大安全性更新,會比較好
如果你目前只想解決您現在的問題,請連線至以下網頁
下載安裝此安全性修補程式:
http://www.microsoft.com/taiwan/security/bulletins/MS03-026.asp
2.解毒方法
(1)安裝上述更新修補程式
(2)關閉系統還原
如何關閉或啟用Windows XP「系統還原」
http://service1.symantec.com/SUPPORT/INTER/traditionalchinesekb.nsf/twdocid/20020517102945932
如何關閉或啟用Windows Me「系統還原」
http://service1.symantec.com/SUPPORT/INTER/traditionalchinesekb.nsf/twdocid/20020517101224932
(3)線上更新病毒碼至最新定義
(4)重新開機按住F8進入安全模式掃描
(5)將所有中毒的檔案直接刪除,解毒完畢
以上資訊轉貼自http://www.pczone.com.tw/vbb3/archive/t-118122.html
1.病毒簡介
Worm@W32.Licum(別名:W32/Tenga.A)
Licum駭蟲透過微軟漏洞進行散播,而目前微軟只提供Windows NT 以上作業系統的修補程式,在此提供解決Windows 98 作業系統不會被感染的方法,以此作為參考。
Licum駭蟲是利用微軟DCOM RPC 介面中的緩衝區滿溢漏洞進行散播,駭蟲執行後,會感染電腦內的執行檔,而目前微軟只針對Windows NT以上的作業系統提供修補程式,而沒有提供Windows 98 作業系統的修補程式,所以使用Windows98的使用者請小心,為了避免使用Windows 98 作業系統的電腦受到感染,解決的方法如下,請修改登錄檔"HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Ole" 下列的值:"EnableDCOM"="N",如果是"N"即為關閉,此時類似 NetMeeting 相關軟體會無法使用,但此方法可先關閉漏洞,以避免駭蟲入侵。
基本介紹
病毒名稱 Worm@W32.Licum
病毒別名 Backdoor.Win32.Small.gl [Kaspersky Lab], Virus.Win32.Tenga.a [Kaspersky Lab], BackDoor-CTM [McAfee], W32/Gael.worm.a [McAfee], W32/Tenga-A [Sophos], PE_TENGA.A [Trend Micro],W32.Licum[symantec]
病毒型態 Worm
病毒發現日期 2005/07/29
利用漏洞
MS03-026(英文)
MS03-026(中文)
影響平台 Windows 95/98/ME , Windows NT/2000/XP/2003
風險評估
散播程度:低
破壞程度:低
Worm@W32.Licum 行為描述:
駭蟲會下載下列檔案:
[http://]utenti.lycos.it/[REMOVED]/dl.exe
[http://]utenti.lycos.it/[REMOVED]/CBACK.EXE
[http://]utenti.lycos.it/[REMOVED]/GAELICUM.EXE
駭蟲會感染電腦內的執行檔。
駭蟲是利用微軟的漏洞進行散播病毒,而目前微軟只針對Windows NT 以上的作業系統提供修補漏洞程式,所以使用Windows 98 作業系統的用戶請小心。
請到Windows Update網站,或按[開始]→[Windows Update]
來更新你的作業系統,並安裝所有重大安全性更新,會比較好
如果你目前只想解決您現在的問題,請連線至以下網頁
下載安裝此安全性修補程式:
http://www.microsoft.com/taiwan/security/bulletins/MS03-026.asp
2.解毒方法
(1)安裝上述更新修補程式
(2)關閉系統還原
如何關閉或啟用Windows XP「系統還原」
http://service1.symantec.com/SUPPORT/INTER/traditionalchinesekb.nsf/twdocid/20020517102945932
如何關閉或啟用Windows Me「系統還原」
http://service1.symantec.com/SUPPORT/INTER/traditionalchinesekb.nsf/twdocid/20020517101224932
(3)線上更新病毒碼至最新定義
(4)重新開機按住F8進入安全模式掃描
(5)將所有中毒的檔案直接刪除,解毒完畢
以上資訊轉貼自http://www.pczone.com.tw/vbb3/archive/t-118122.html
2007年11月15日 星期四
在Excel VBA 開關存檔
以下是花了很多時間嘗試的VBA 操控EXCEL
'建立Excel物件
Set ExcelObj = Server.CreateObject("Excel.Application") '建立Excel物件
ExcelObj.DisplayAlerts = false '不顯示警告訊息
ExcelObj.Application.Visible = true '顯示應用程式
'開啟Excel文件
Set ExcelApp = ExcelObj.WorkBooks.Open(ExcelTmp) '設定Excel物件開啟ExcelTmp這個檔案
Set ExcelBook = ExcelObj.ActiveWorkBook '指定ExcelBook為作用工作表
ExcelBook.Sheets("table6").Select '選擇作用工作表
Set ExcelSheets = ExcelBook.Worksheets("table6")
ExcelObj.Interactive = false
ExcelObj.Application.DisplayAlerts = false
'儲存檔案
ExcelSheets.Range("B6").Select '選取B6這個儲存格
With ExcelObj.ActiveWindow '對該Excel物件做分割於左方1 格下方5格的位置分割
.SplitColumn = 1
.SplitRow = 5
End With
ExcelObj.ActiveWindow.FreezePanes = True '凍結視窗
ExcelObj.activewindow.Zoom = 75 'Zoom 75%
SaveFileName = "abcde.xls" '設定檔名
ExcelApp.SaveAs Server.MapPath("./" & SaveFileName) '將檔案另存於本機目錄下的abcde.xls
Set Excelsheets = ExcelBook.Sheets(1) '將Excelsheets設為第一工作簿
'關閉程式
ExcelObj.Quit '離開Excel
Set ExcelObj = nothing '釋放Excel物件所使用的記憶體
'建立Excel物件
Set ExcelObj = Server.CreateObject("Excel.Application") '建立Excel物件
ExcelObj.DisplayAlerts = false '不顯示警告訊息
ExcelObj.Application.Visible = true '顯示應用程式
'開啟Excel文件
Set ExcelApp = ExcelObj.WorkBooks.Open(ExcelTmp) '設定Excel物件開啟ExcelTmp這個檔案
Set ExcelBook = ExcelObj.ActiveWorkBook '指定ExcelBook為作用工作表
ExcelBook.Sheets("table6").Select '選擇作用工作表
Set ExcelSheets = ExcelBook.Worksheets("table6")
ExcelObj.Interactive = false
ExcelObj.Application.DisplayAlerts = false
'儲存檔案
ExcelSheets.Range("B6").Select '選取B6這個儲存格
With ExcelObj.ActiveWindow '對該Excel物件做分割於左方1 格下方5格的位置分割
.SplitColumn = 1
.SplitRow = 5
End With
ExcelObj.ActiveWindow.FreezePanes = True '凍結視窗
ExcelObj.activewindow.Zoom = 75 'Zoom 75%
SaveFileName = "abcde.xls" '設定檔名
ExcelApp.SaveAs Server.MapPath("./" & SaveFileName) '將檔案另存於本機目錄下的abcde.xls
Set Excelsheets = ExcelBook.Sheets(1) '將Excelsheets設為第一工作簿
'關閉程式
ExcelObj.Quit '離開Excel
Set ExcelObj = nothing '釋放Excel物件所使用的記憶體
2007年10月26日 星期五
2007年9月22日 星期六
20070922筆電維修日誌
最近不知道是天氣轉涼還是怎樣,大家的筆電是都感冒喔?
一台接著一台,今天是恩欣的HP 9200系列的筆電(反覆開機~進不了WINDOWS)
恩欣說:之前操作有不正常關機。
推測可能原因:作業系統正在寫入系統檔案到硬碟過程中,電源中斷,檔案寫入失敗(可能是系統檔損壞)
修復對策:這個狀況跟上次賴亦亘的狀況類似(都是系統毀損),進入系統主控台後修復MBR、並執行磁碟檢查(順利通過檢查即可)
修復步驟:
fixmbr
fixboot
chkdsk /r/p
重新開機後.................結案!!
一台接著一台,今天是恩欣的HP 9200系列的筆電(反覆開機~進不了WINDOWS)
恩欣說:之前操作有不正常關機。
推測可能原因:作業系統正在寫入系統檔案到硬碟過程中,電源中斷,檔案寫入失敗(可能是系統檔損壞)
修復對策:這個狀況跟上次賴亦亘的狀況類似(都是系統毀損),進入系統主控台後修復MBR、並執行磁碟檢查(順利通過檢查即可)
修復步驟:
fixmbr
fixboot
chkdsk /r/p
重新開機後.................結案!!
20070915筆電維修日誌
九月十五日去婉姐家幫他看他的筆電(TOSHBA M500)
系統開機緩慢(執行程式更是慢到不行~典型的中毒現象)
二話不說,馬上進行備份動作(備份到D碟、備份到隨身碟)
原本想直接燒DVD但燒錄程式動作不正常(直接放棄)TOSHBA的燒錄程式
最後發現TOSHBA的筆電竟然要用光碟才能進行還原(已經民國幾年啦,居然沒有還原分割區)意即不支援單鍵還原~叫我怎麼推薦人家買呀?
最後還好找到了當初隨貨附贈的還原光碟片,整個還原過程大約二十來分鐘,不會動到分割區(算是還可以接受)
心裡有一個感想:賣電腦的業務真的實力不怎麼樣~更別說消費者電腦買回去遇到問題後的處置辦法了。如果一個不懂電腦的人去買筆電~下場可能會很慘!
那天在婉姐家足足弄了八個小時(怎麼會這麼久?)
還重置了他家的寬頻分享器DI-524
DI-524的重置步驟真是有夠麻煩
按下reset鈕不放,切斷電源(reset鈕還是不能放),再插上電源,等status燈閃爍後才能放開。
若status燈持續閃爍,則整個步驟需重新來過。(哪門子的便利呀?)
系統開機緩慢(執行程式更是慢到不行~典型的中毒現象)
二話不說,馬上進行備份動作(備份到D碟、備份到隨身碟)
原本想直接燒DVD但燒錄程式動作不正常(直接放棄)TOSHBA的燒錄程式
最後發現TOSHBA的筆電竟然要用光碟才能進行還原(已經民國幾年啦,居然沒有還原分割區)意即不支援單鍵還原~叫我怎麼推薦人家買呀?
最後還好找到了當初隨貨附贈的還原光碟片,整個還原過程大約二十來分鐘,不會動到分割區(算是還可以接受)
心裡有一個感想:賣電腦的業務真的實力不怎麼樣~更別說消費者電腦買回去遇到問題後的處置辦法了。如果一個不懂電腦的人去買筆電~下場可能會很慘!
那天在婉姐家足足弄了八個小時(怎麼會這麼久?)
還重置了他家的寬頻分享器DI-524
DI-524的重置步驟真是有夠麻煩
按下reset鈕不放,切斷電源(reset鈕還是不能放),再插上電源,等status燈閃爍後才能放開。
若status燈持續閃爍,則整個步驟需重新來過。(哪門子的便利呀?)
訂閱:
文章 (Atom)