Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,038

HOME > .NET Framework > Forum > ขอ Code Kill Process Excel ใน task manager หน่อยครับ ^^ vb basic 2010

[.NET] ขอ Code Kill Process Excel ใน task manager หน่อยครับ ^^ vb basic 2010

เริ่มหัวข้อใหม่

Guest

Code (VB.NET)

OpenFileDialog1.Filter = "Excel Files (*.xlsx,*.xls)|*.xlsx;*.xls"
        If OpenFileDialog1.ShowDialog = Windows.Forms.DialogResult.OK Then
            Dim address As String = OpenFileDialog1.FileName
            Dim excel As New Excel.Application
            Dim wbook As Excel.Workbook = excel.Workbooks.Open(address)
            Dim wsheet As Excel.Worksheet = DirectCast(wbook.Worksheets(1), Excel.Worksheet)
            excel.Visible = False
            Dim i, j As Integer
 
 
            i = 0
            Do While IsNumeric(wsheet.Cells(i + 3, 2).value) = True 'นับแถว RoW
                i += 1
                RowE = i
            Loop
 
 
            j = 0
            Do While IsNumeric(wsheet.Cells(3, j + 2).value) = True 'นับ Column
                j += 1
                ColumnE = j
            Loop
 
            'MessageBox.Show(RowE & "," & ColumnE)
            ReDim Dta(RowE, ColumnE)
            ReDim Dta2(RowE, ColumnE)
 
            For x = 1 To RowE
                For y = 1 To ColumnE
 
                    Dta(x, y) = wsheet.Cells(x + 2, y + 1).value
                    Dta2(x, y) = wsheet.Cells(x + 2, y + 1).value
                    'MessageBox.Show(Dta(x, y))
                    'ComboBox1.Items.Add(Dta(x, y))
                Next
            Next

จาก Code นี้ เป็นการ import ข้อมูลจาก excel มาเป็น array แล้วต้องกด หลายๆ ครั้งทำให้ excel ที่อยู่ใน task manager ค้างอยู่จำนวนมาก
และทำให้โปรแกรม เอ๋อ อยากจะขอโค๊ดที่มา kill excel หน่อย task manager หน่อยครับ

Tag : .NET, VB.NET

Date : 2014-03-16 14:33:42

By : Knowhow

View : 2088

Reply : 2

No. 1

TC Admin

โพสกระทู้ ( 74,059 )
บทความ ( 838 )

ปกติถ้าคุณ Close หรือ Quit ถูกต้องมันก็จะไม่มี Process ค้างน่ะครับ ลองเข้าไปดูวิธ๊ในบทความที่เกี่ยวกับ Excel ครับ

Date : 2014-03-17 06:46:08

By : mr.win

No. 2

Guest

kill process by name

Code (VB.NET)

Public Class Form1
  
    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        'Call killprocess function and send the name of the program you'd like to kill
        killprocess("calc") 'ชื่อ process ที่จะ kill
    End Sub
  
    Public Function killprocess(ByVal processname As String)
  
        'Get list of all running processes
        Dim proc() As Process = Process.GetProcesses
  
        'Loop through all processes
        For i As Integer = 0 To proc.GetUpperBound(0)
            If proc(i).ProcessName = processname Then
                'kill process if name is calc
                proc(i).Kill()
                MessageBox.Show("ปิด process calculator เรียบร้อยแล้ว!", "www.thaicreate.com", MessageBoxButtons.OK, MessageBoxIcon.Information)
            End If
        Next
  
    End Function
  
End Class

Date : 2014-04-26 21:54:46

By : Thekill

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : ขอ Code Kill Process Excel ใน task manager หน่อยครับ ^^ vb basic 2010

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก

<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)