Hvordan spørring fra et Excel-regneark ved hjelp av Visual Basic

Hvordan spørring fra et Excel-regneark ved hjelp av Visual Basic


Excel-regneark gir informasjon som brukes i Visual Basic (VB) applikasjoner. VB former inneholde interne Excel tilkoblinger for spørring data. Informasjonen du spør deretter brukes til å vise, beregne eller manipulere data. Du kobler til et Excel-regneark fra VB med lignende teknikker som brukes til å spørre en Access-database eller SQL Server. VB språket er en enkel måte å bruke Excel-regneark i alle stasjonære og web-applikasjon.

Bruksanvisning

1 Lag tilkoblingsstrengen som peker til Excel regneark. Strengen faktisk ikke koble til forbindelsen er kalt, men det setter opp kommandoen brukes til å feste VB til Excel. Følgende kode setter opp forbindelsen streng:

Dim conn As String = \ "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = C: \ theExcelFile.xls; Extended Properties = \" \ "Excel 8.0; \" \ "\"

Bytt ut \ "C: \ theExcelFile.xls \" med navnet på Excel-regneark.

2 Koble til og søke i Excel regneark. Den \ "OLE Adapter \" kobles til ulike filer på harddisken din fra Visual Basic. Den OLE Adapter håndterer oversettelsen mellom VB koden og Excel-formatert fil. Følgende velger alle postene fra første regnearket:

Dim data som ny OledbDataAdapter (\ "select * from [Ark1 $] \", conn)

Legg merke til den \ "conn \" connection string variabel er lagt til adapteren.

3 Fyll datasettet, slik at du kan bruke de returnerte verdiene i andre områder av VB kode. Et datasett er en grunnleggende enhet som brukes til å inneholde alle postene hentes fra alle datakilder slik som Excel, Access eller SQL Server. Bruk følgende kode for å \ "fylle \" datasettet med den returnerte Excel verdiene:

Dim datasett som ny DataSet ()
data.TableMappings.Add (\ "Table \", \ "Excel \")
data.Fill (datasett)

4 Vis Excel-filen innholdet til brukeren. Den enkleste måten å vise data som er hentet fra en database eller fil bruker en \ "Gridview \" objekt. Følgende kode viser resultatene fra Excel til VB skjemaet:

theGrid.DataSource = dataset.Tables (0) .DefaultView
theGrid.DataBind ()