ejecutar consulta de forma asincronica

[Yerim]

Hola a Todos , este foro es muy bueno, espero y puedan ayudarme con esta duda que tengo.

Tengo el siguiente codigo de VB, lo que pasa es que al ejecutar una consulta, esta agota el tiempo de espera del servidor, y me dijeron que tenia que ejecutar la consulta de manera asincrona.

Que debo hacer para ejecutar mi consulta de manera asincrona?


Imports System.Data
Imports System.Data.SqlClient


Partial Class list
Inherits System.Web.UI.Page

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load

Dim conexion1 As String
conexion1 = "Data Source = alumnos_2007; Initial Catalog = industrial; User Id = tesco; Password = tesco01 Asynchronous Processing = true"
Dim conecta As New SqlConnection(conexion1)

Dim consulta1 As String
consulta1 = "Select * From grupo_6540 Where (Folio like '%%" & Request.Form("t1") & "%%') and (Matricula Like '%%" & Request.Form("t2") & "%%')"
Dim comando1 As New SqlCommand(consulta1, conecta)

Dim adapter1 As New SqlDataAdapter
adapter1.SelectCommand = comando1

conecta.Open()

Dim dataset1 As New DataSet

adapter1.Fill(dataset1, "grupo_6540")

conecta.Close()

g1.datasource = dataset1
g1.databind()

End Sub


End Class

[Peterpay]

public partial class Form1 : Form
{
SqlConnection con = new SqlConnection("Data Source=.;initial catalog=Deepra;uid=sa;pwd=;Asynchronous Processing=true;");
ArrayList DataHolder = new ArrayList();
public Form1()
{
InitializeComponent();
}

private void BtnPopulate_Click(object sender, EventArgs e)
{
SqlCommand com = new SqlCommand("select * from student", con);
con.Open();
AsyncCallback callback = new AsyncCallback(DataReaderIsReady);
IAsyncResult result = com.BeginExecuteReader(callback, com);
}

private void DataReaderIsReady(IAsyncResult result)
{
SqlCommand com = (SqlCommand)result.AsyncState;
SqlDataReader rd = com.EndExecuteReader(result);
if (rd.HasRows)
{
foreach (DbDataRecord rec in rd)
{
DataHolder.Add(rec);
}
}
rd.Close();
con.Close();
MessageBox.Show("Results Load Complete", "I'm Done");
}

private void BtnBind_Click(object sender, EventArgs e)
{
dataGridView1.DataSource = DataHolder;
}
}

un ejemplo espero q te sirva

saludos

peter

pd. esto es c# revisar equivalencias en vb.net

[Peterpay]

recuerda q puedes llenar tu dataset con tu datareader

saludos
peter