Momentan sunteți offline, așteptați să vă reconectați la internet

Cum se importă date din Microsoft SQL Server în Microsoft Excel

IMPORTANT: Acest articol a fost tradus de software-ul de traducere automată Microsoft, si nu de un traducător. Microsoft vă oferă atât articole traduse de persoane, cât şi articole traduse automat, astfel incat aveti access la toate articolele din Baza noastră de informatii în limba dvs. materna. Totuşi, un articol tradus automat nu este întotdeauna perfect. Acesta poate conţine greşeli de vocabular, sintaxă sau gramatică, la fel cum un vorbitor străin poate face greşeli vorbind limba dvs. materna. Compania Microsoft nu este responsabilă pentru nici o inexactitate, eroare sau daună cauzată de traducerea necorespunzătoare a conţinutului sau de utilizarea traducerii necorespunzătoare de către clienţii nostri. De asemenea, Microsoft actualizează frecvent software-ul de traducere automată.

Faceți clic aici pentru a vizualiza versiunea în limba engleză a acestui articol:306125
REZUMAT
Acest pas cu pas ghid descrie cum pentru a importa datele în Microsoft Excel din baza acoperire de date pub-uri, o baza acoperire de date eşantion care este inclus cu Microsoft SQL Server.

Obiecte acoperire de date ActiveX (ADO) oferă acces la orice tip de sursă acoperire de date. Este un model obiect plat cu câteva obiecte. Obiecte principale în modelul de obiecte ADO sunt:
   Object          Description   -----------------------------------------------------------------------   Connection      Refers to the connection to the data source.   Recordset       Refers to the data extracted.   Command         Refers to a stored procedure or SQL statements that                    need to be executed.				
Deşi există multe moduri de a returna un set de înregistrări utilizând ADO, acest articol se concentrează pe conexiunea şi obiectele Recordset.

Cerințele

Trebuie să aveţi un server local care se execută Microsoft SQL Server şi care conţin date pub-uri.

Microsoft recomandă aveţi cunoştinţe de următoarele:
  • Crearea Visual Basic pentru aplicaţii procedurile în programele Office.
  • De lucru cu variabile obiect.
  • Lucrul cu obiecte de Excel.
  • Relational sisteme de Management baze acoperire de date (RDBMS) concepte.
  • Structured Query Language (SQL) instrucţiuni SELECT.

Corelarea bibliotecă de obiecte ADO

  1. Porniţi Excel. Deschideţi un registru de lucru şi apoi salvaţi-l ca SQLExtract.xls.
  2. Porniţi Visual Basic Editor şi selectaţi proiectul VBA.
  3. Pe Instrumente meniu, faceţi clic pe Referinţe.
  4. Faceţi clic pentru a selecta cea mai recentă versiune a Bibliotecă obiecte Microsoft ActiveX date casetă de selectare.

Crearea conexiunea

  1. Inseraţi un nou modul în proiect.
  2. Creaţi o nouă procedură de Sub numit DataExtract.
  3. Tastaţi sau lipiţi următorul cod:
    ' Create a connection object.Dim cnPubs As ADODB.ConnectionSet cnPubs = New ADODB.Connection' Provide the connection string.Dim strConn As String'Use the SQL Server OLE DB Provider.strConn = "PROVIDER=SQLOLEDB;"'Connect to the Pubs database on the local server.strConn = strConn & "DATA SOURCE=(local);INITIAL CATALOG=pubs;"'Use an integrated login.strConn = strConn & " INTEGRATED SECURITY=sspi;"'Now open the connection.cnPubs.Open strConn					

Extragerea datelor

Tastaţi sau lipiţi următorul cod pentru a extrage înregistrările:
' Create a recordset object.Dim rsPubs As ADODB.RecordsetSet rsPubs = New ADODB.RecordsetWith rsPubs	' Assign the Connection object.	.ActiveConnection = cnPubs	' Extract the required records.	.Open "SELECT * FROM Authors"	' Copy the records into cell A1 on Sheet1.	Sheet1.Range("A1").CopyFromRecordset rsPubs		' Tidy up	.CloseEnd WithcnPubs.CloseSet rsPubs = NothingSet cnPubs = Nothing				

Verificarea că codul de lucrări

  1. Executaţi codul.
  2. Comutaţi în Excel şi uita-te la Foaie1 în registrul de lucru pentru a vizualiza datele.

Depanare

În cazul în care codul pare să stea şi primiţi o eroare de execuţie, serverul de baze acoperire de date poate fi în jos. Utilizaţi proprietatea ConnectionTimeout pentru a controla marcă de timp este nevoie pentru a returna o eroare run-time. Setaţi această proprietate la o valoare mai mare decât zero. Dacă setaţi valoarea la zero, conexiunea nu va time out. valoare implicită este de 15 secunde.
REFERINŢE
Puteţi găsi codul eșantionului suplimentare de căutare site web Microsoft:
acc2002 xl2002 XL2003 XL2007

Avertisment: acest articol a fost tradus automat

Proprietăți

ID articol: 306125 - Ultima examinare: 04/19/2012 03:20:00 - Revizie: 1.0

Microsoft Office Excel 2007, Microsoft Excel 2002 Standard Edition

  • kbhowtomaster kbmt KB306125 KbMtro
Feedback