CTRL + V

[Farzad Z]

فروش فلش مموری 16 گیگ با 1 سال گارانتی تعویض 25 هزار تومان :blink::blink:
:lol:

 

[ببره بی دندون]

User: Admin
Password: K20h$0nFd

 

[Blues Man]

من تازه لاگین کردم تو ویندوز خالیه خالیه ...

 

[Para2x]

Dim MyConnection As System.Data.OleDb.OleDbConnection
        Try
            Dim DtSet As System.Data.DataSet
            Dim MyCommand As System.Data.OleDb.OleDbDataAdapter
            MyConnection = New System.Data.OleDb.OleDbConnection("provider=Microsoft.Jet.OLEDB.4.0; " & _
                            "data source='" & EditBox1.Text & " '; " & "Extended Properties=Excel 8.0;")
            MyCommand = New System.Data.OleDb.OleDbDataAdapter("select * from [sheet1$]", MyConnection)
            MyCommand.TableMappings.Add("Table", "Attendence")
            DtSet = New System.Data.DataSet
            MyCommand.Fill(DtSet)
            Dim i As Integer
            For i = 0 To DtSet.Tables(0).Columns.Count - 1
                UiComboBox1.Items.Add(DtSet.Tables(0).Columns(i).ToString())
                UiComboBox2.Items.Add(DtSet.Tables(0).Columns(i).ToString())
            Next
            MyConnection.Close()
            UiGroupBox2.Enabled = True
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical)

            MyConnection.Close()
        End Try

 

[shervin]

file:///H:/Download/XP%20Lite/Windows-XP-SP3-Lite-2008-v3.1-SuperFast-Windows-www.fdl.ir.part1.exe

 

[ataamini]

Microsoft Windows XP [Version 5.1.2600]
(C) Copyright 1985-2001 Microsoft Corp.

C:\Documents and Settings\tec>ping 4.2.2.4

Pinging 4.2.2.4 with 32 bytes of data:

General failure.
Destination host unreachable.
Destination host unreachable.
Destination host unreachable.

Ping statistics for 4.2.2.4:
    Packets: Sent = 4, Received = 0, Lost = 4 (100% loss),

C:\Documents and Settings\tec>