[+/-] : Windows 7 Print Spooler 自動關閉

原來是Windows 7 與 HP相衝的關係
發生原因可能是該印表機被當成是Shared的印表機
列印文件發生問題，造成此Service當掉所致

1.先將此Service停用 (Stop)，按滑鼠右鍵Stop
2.然後到C:\Windows\System32\spool\PRINTERS將目錄內的資料全數刪除
3.將此Service啟用 (Start)，按滑鼠右鍵Start

應該可以解決此問題...
Read more.

[+/-] : Linq Where in 進階版

之前的文章有介紹
http://lovetoknowgoogleandmstech.blogspot.com/2009/01/linq-where-in-and-not-in.html

現在來個進階版囉!直接看Code比較快
先來個String字串的Where in

     Dim Lot() As String = Split("21003144,21003145", ",")
     Dim i1 As Integer = 0
     Dim query = From p In db.Packing_Item_Entry_History _
                 Where (Lot).Contains(p.pieh_Lot_No) _
                 Select p.pieh_Lot_No, p.pieh_pih_Job_No
     DataGridView1.DataSource = query
or
     Dim query = From p In db.Packing_Item_Entry_History _
                 Where (Split("21003144,21003145", ",")).Contains(p.pieh_Lot_No) _
                 Select p.pieh_Lot_No, p.pieh_pih_Job_No
     DataGridView1.DataSource = query

再來個數字版的Where in

Use integer
       Dim dkey_arr() As String = Split("14472,14473", ",")
       Dim iArray(dkey_arr.Length - 1)
       For i As Integer = 0 To dkey_arr.Length - 1
           iArray(i) = CType(dkey_arr(i), Integer)
       Next
       Dim query = From p In db.Packing_Item_Entry_History _
                   Where (iArray).Contains(p.pieh_dKey) _
                   Select p.pieh_Lot_No, p.pieh_pih_Job_No
       DataGridView1.DataSource = query

或者是

Use integer
       Dim i_List As New List(Of Integer)
       For Each s As String In String.Split("14472,14473", ",")
           i_List.Add(CType(s, Integer))
       Next
       Dim query = From p In db.Packing_Item_Entry_History _
                   Where (i_List).Contains(p.pieh_dKey) _
                   Select p.pieh_Lot_No, p.pieh_pih_Job_No
       DataGridView1.DataSource = query

...
Read more.

[+/-] : Winfrom 子視窗傳值給父視窗

直接看Code囉

先在Form1建立一個Untyped dataset並取名為DS1及Textbox取名為TextBox1
Public Class Form1
    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Dim sForm2 As New Form2()
        sForm2.ShowDialog(Me)
        DataGridView1.DataSource = DS1.Tables(0)
    End Sub
End Class


Public Class Form2
    Dim db As New VivaDataClassesDataContext()
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim frm1 As Form1 = DirectCast(Me.Owner, Form1)
        DirectCast(frm1.Controls("textBox1"), TextBox).Text = TextBox1.Text
        Dim query = From p In db.Product_Daily_Report_Comment _
                    Select p
        frm1.DS1.Tables(0).Load(New DataTableReader(query.ToDataTable()))
        Me.Close()
    End Sub
End Class

...
Read more.

[+/-] : Vmware Open Intel VT

查看Bios已經開了VT可是在VMware還是不能灌64位元的作業系統

後來拜請Google大神查到以下文章

原來Bios打開VT之後!重點來了

請先關機，把電源都拔掉!筆者為了保險起見!連螢幕的電源都拔了

等了幾秒之後!再把插頭都接回去!

開機之後!一切問題迎刃而解!


http://stupefydeveloper.blogspot.com/2008/12/intel-vt-how-to-enable.html...
Read more.

[+/-] : Windows 7 當機 處理方式

今天遇到一件很奇怪的事!就是電腦開機之後
有看到歡迎畫面~然後進到桌面時!畫面一片藍底，滑鼠會動!
很明顯就是當掉了!因為Ctrl+Alt+Del都不能用!

再重開機一次之後會出現不正常關機的畫面!可以選擇進安全模式
呵!安全模式可以進!腦中浮現最近安裝的軟體!唯一可疑的就是防毒程式Nod32
先移掉看看吧!那泥!原來Windows 7安全模式是不能移除軟體的!

拜求Google大神之後，找到一個讓Windows 7安全模式也能安裝和移除軟體的方式
進安全模式之後!進command mode然後打以下指令


REG ADD "HKLM\SYSTEM\CurrentControlSet\Control\SafeBoot\Minimal\MSIServer" /VE /T REG_SZ /F /D "Service"

net start msiserver


然後再選到防毒程式的安裝程式*.msi按右鍵!呵~Uninstall出現囉

移完之後!重新開機!果然ok了!看來防毒程式真的要慎選!...
Read more.