1月 21, 2010

WinRAR九大不傳密技

[其  他][討論] [轉貼] WinRAR九大不傳密技

  WinRAR是大家平時用得最多的壓縮軟體,針對它的技巧文章也很多。不過,儘管如此,我們還是挖出了很多玩家沒有找出的一些獨門絕技。在此,借《電腦愛好者》一角,與大家共同探討!

密技一:注意危險自解壓程序

  相信使用WinRAR來元件服務木馬的文章大家也見到了很多。在此,建議大家,收到可執行的附件文件時,先把它們儲存起來。然後試著右擊它,選項WinRAR表單,如果其下「用WinRAR開啟」指令可用●,則表明此程序是一個自解壓程序。此時可以把該檔案的副檔名由EXE改為RAR,雙按後即可用WinRAR開啟它,這樣會安全許多。


密技二:讓WinRAR「專一」工作

  在第7期第31頁的《編輯壓縮包中的文件別讓WinRAR休息》中我們已經提醒大家,在編輯壓縮包內文件時,千萬不要關閉該壓縮包視窗,否則無法儲存對文件的修改。另外,如果在此時雙按開啟其他RAR壓縮包,WinRAR可能會自動關閉你正在修改文件的壓縮包,從而無法更新所做修改,所以建議你在WinRAR視窗中按下Ctrl+S鍵,取消「一般」標籤下的「重複使用已存在的視窗」複選框。


密技三:文件壓縮大小我先知

  開啟WinRAR視窗,選項要壓縮的文件,按下工作列上的「信息」按鈕,在開啟視窗中按下「估計」按鈕,WinRAR會給出壓縮率、壓縮包大小和壓縮這個文件需要的時間等資料,這對於你壓縮比較大的文件或資料夾非常有用。如果你希望每次按下「信息」按鈕,以後WinRAR自動對文件進行評估的話,還可以選「自動開始」選項。

密技四:快速更換驅動器

  按下Ctrl+D鍵,可在WinRAR視窗中出現電腦上所有驅動器列表,用滑鼠選項即可快速進入相應的驅動器。


密技五:批量建立資料夾

  如果在工作中,經常要建立很多相同資料夾結構(如在制作備份資料時)。那可以把這個繁瑣的工作讓WinRAR完成:先在「檔案總管」中把多個資料夾結構建好(包括其下的子資料夾),再選並右擊這些資料夾,選項WinRAR→「增加到壓縮檔案」,在開啟的設定視窗中選「壓縮選項」下的「新增自釋放格式檔案文件」前複選框,按下「確定」按鈕。再把產生後的EXE文件改名為folders.exe。以後要在哪個資料夾下建立上述資料夾,只要把這個檔案拷貝到那個資料夾下,再雙按folders.exe,按下「安裝」按鈕即可。


密技六:我的設定你別改

  啟動「記事本」,在其中輸入以下語句:
Windows Registry Editor Version 5.00

[HKEY_LOCAL_MACHINE\SOFTWARE\WinRAR\Policy]
"Menu"=dword:00000000
"Settings"=dword:00000000

  把它儲存為limitrar.reg文件,再雙按並匯入這個REG文件,把它匯入註冊表。啟動WinRAR,你會發現表單無法使用,而且按Ctrl+S鍵也無法調出「設定」和「選項工作列按鈕」視窗,相對安全多了

小提示:
★把以上語句中的00000000改為00000001,另存新檔unlim.reg。雙按匯入unlim.reg文件即可恢復表單,並允許使用「設定」視窗。
★其中的Menu項設定為0/1,用來禁止/允許WinRAR 主表單,而Settings項設定為0/1,用來禁止/允許「設定」和「選項工作列按鈕」對話視窗。
★如果你使用Windows 9x/Me,請把上面的Windows Registry Editor Version 5.00改為REGEDIT 4。


密技七:快速解壓RAR壓縮包指定文件

  如果想解壓RAR壓縮包中指定文件,可在開啟RAR文件後,選「選項」→「文件列表」→「平面資料夾檢視」。此RAR壓縮包中的所有文件會都顯示出來(包括在相應資料夾中的),此時只要像「檔案總管」中一樣,按下相應按鈕,如名稱、大小、類型、修改時間、路徑等,就能對RAR包中的所有文件進行排序,做到一目瞭然。按檔案類型排序後,配合Ctrl或Shift鍵選指定文件,用滑鼠拖放到資料夾下即可快速解壓。按下Ctrl+H鍵取消平面資料夾檢視模式。

小提示
  先把RAR包切換到平面資料夾檢視模式,再按下「類型」按鈕,該包中所有類型的文件就被放置在一起(如所有的.tmp文件),先選第一個文件,按住Shift鍵不鬆開,再按下最後一個文件,選相應文件,按下Del鍵即可刪除掉RAR包中同一類型文件。


密技八:批量轉換壓縮包

  如果你手頭上有多種格式的壓縮包,想把它們都轉換為RAR包,那可以這樣做:先把這些壓縮包放到一個資料夾下,如C:\compress。在WinRAR中選C:\compress資料夾。再按下「指令」→「轉換壓縮檔案」,在開啟的視窗中勾選「刪除原來的壓縮檔案」複選框,按下「確定」按鈕即可把它們轉換成RAR壓縮包●。通過此法,可以把ZIP、CAB、ARJ、ACE、TAR、BZ2 、UUE、GZ、LZH等壓縮包轉換成RAR格式。


密技九:重要文件,別刪

  在RAR壓縮包中刪除文件後,WinRAR會自動更新它,其中被刪除的文件無法再找到(資源回收桶中也沒有)。因此,如果壓縮包確實不再修改或比較重要,則請選此壓縮包(不要雙按開啟它),然後按Alt+L組合鍵,在開啟的視窗中驗證「禁止修改壓縮檔案」複選框被選,按下「確定」按鈕即可把此壓縮包鎖住,其中的文件便無法被修改或刪除。

  此指令只支持RAR壓縮檔案,同時,在壓縮檔案時,設定視窗中也有一個「鎖定壓縮檔案」複選框●,一旦選,產生後的壓縮包將無法再修改,它對於制作備份重要資料很有用。

1月 17, 2010

ADO.net 程式碼大全 For VB


Protected Sub LinkButton1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles LinkButton1.Click
        'Datareader
        Dim cn As SqlConnection = New SqlConnection(ado.conn)
        Dim cmd As SqlCommand = New SqlCommand("select * from book;select * from test", cn) '讀雙資料表大絕!!
        cn.Open()
        Dim dr As SqlDataReader = cmd.ExecuteReader()
        'dr.Read() '特性為一次讀一欄
        Do While dr.Read()
            'TextBox1.Text = dr.Item("ct")
            Response.Write(dr.Item("ct") + "<br />")


        Loop
        dr.NextResult()
        Do While dr.Read()
            'TextBox1.Text = dr.Item("ct")
            Response.Write(dr.Item("ct2") + "<br />")


        Loop
        'TextBox1.Text = dr.GetValue(1)
        dr.Close()
        With cn
            .Close()
            .Dispose()
        End With
        cn = Nothing


    End Sub


    Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
        'dataset
        Dim cn As SqlConnection = New SqlConnection(ado.conn)
        Dim ap As SqlDataAdapter = New SqlDataAdapter("select * from book", cn)
        'Dim ap As SqlDataAdapter = New SqlDataAdapter("update set ct = @ct WHERE id = 1", cn)
        Dim dt As DataSet = New DataSet()
        ap.Fill(dt, "444")
        TextBox1.Text = dt.Tables(0).Rows(0)(1)
        Dim ap2 As SqlDataAdapter = New SqlDataAdapter("select * from test", cn) '讀雙資料表大絕!!
        ap2.Fill(dt, "555")
        Response.Write(dt.Tables("555").Rows(0)(1))
        'GridView1.DataSource = dt.Tables(0)
        'GridView1.DataBind()


    End Sub


    Protected Sub Button3_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button3.Click
        'datareader update
        Using cn As New SqlConnection(ado.conn)
            cn.Open()
            Dim cmd As New SqlCommand("update book set ct = @ct where id = 2", cn)
            cmd.Parameters.AddWithValue("@ct", TextBox1.Text)
            cmd.ExecuteNonQuery()
        End Using
        'cn.Close() 使用USING可以不需要去關閉!
    End Sub


    Protected Sub Button4_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button4.Click
        'dataset update
        Dim cn As SqlConnection = New SqlConnection(ado.conn)
        'Dim ap As SqlDataAdapter = New SqlDataAdapter
        Dim ap As SqlDataAdapter = New SqlDataAdapter("select * from book where id = 2", cn)
        'Dim dt As DataSet = New DataSet()
        Dim dt As DataTable = New DataTable()
        ap.Fill(dt)
        ap.InsertCommand = New SqlCommand("insert into book ct values @ct ", cn)
        ap.UpdateCommand = New SqlCommand("update book set ct = '5214' where id = 2", cn)
        'ap.UpdateCommand.CommandText = "update book set ct = @ct where id = 2"
        'ap.UpdateCommand.Parameters.AddWithValue("@ct", TextBox1.Text)
        dt.Rows(0)(1) = "555"
        ap.Update(dt) '由於update()方法會自動偵測變更選用相關command 所以他的更新方式很機車= =
    End Sub
End Class


1月 09, 2010

『ASP.NET』無法存取 IIS Metabase

遇上這個問題的話呢~

開啟visual studio--->visual studio tools 的命令提式字元~

打上aspnet_regiis -i 重新安裝 .net framework就ok了~