CARA: Menggunakan ASP.NET untuk Query dan menampilkan Database Data dalam Excel dengan menggunakan Visual Basic.NET

Terjemahan Artikel Terjemahan Artikel
ID Artikel: 308247 - Melihat produk di mana artikel ini berlaku.
Perbesar semua | Perkecil semua

Pada Halaman ini

RINGKASAN

Artikel ini selangkah demi selangkah menjelaskan cara untuk membangun sebuah teks tab-delimited file secara dinamis dari database yang dapat dibuka di Microsoft Excel. Contoh dalam artikel ini menunjukkan bagaimana untuk menghubungkan ke Microsoft SQL Server database, kembali set data dari database Pub, dan untuk membuat teks tab-delimited file dengan data.

Membangun sampel

Artikel ini menunjukkan cara membuat sampel ASP.NET Visual Basic halaman yang dinamakan ExcelVB.asp. Halaman ini menghubungkan ke SQL Server Pub database dan kembali informasi ke file teks tab-delimited dengan menggunakan FileStream objek. Link ke file .xls baru kemudian muncul pada halaman untuk menunjukkan output dari kode.
  1. Mulai Microsoft Visual Studio.NET.
  2. Pada Berkas menu, titik Baru, lalu klik Project.
  3. Dalam Proyek baru kotak dialog, klik Proyek-proyek Visual Basic di bawah Jenis proyek, lalu klik ASP.Aplikasi NET Web di bawah Pola acu.
  4. Dalam Nama kotak, jenis ExcelVBTest. Dalam Lokasi kotak, klik server sesuai. Jika Anda menggunakan server lokal, Anda dapat meninggalkan nama server sebagai "http://localhost." Klik Oke.
  5. Dalam WebForm1.aspx file, tarik kontrol HyperLink dari toolbox untuk formulir Web.
  6. Klik kanan WebForm1.aspx file, dan kemudian klik Lihat kode untuk menampilkan halaman di belakang kode sumber.
  7. Tambahkan kode berikut ke bagian atas halaman kode:
    Imports System.Data
    Imports System.Data.Common
    Imports System.Data.SqlClient
    Imports System.IO
    Imports System.Text
    					
  8. Tambahkan kode berikut untuk Page_Load acara:
    Dim i As Integer
    Dim strLine As String, filePath, fileName, fileExcel, link
    Dim objFileStream As FileStream
    Dim objStreamWriter As StreamWriter
    Dim nRandom As Random = New Random(DateTime.Now.Millisecond)
    Dim fs As Object, myFile As Object
    Dim cnn As SqlConnection = New SqlConnection("server=(local);database=pubs;" & _
                                                 "Integrated Security=SSPI")
    
    'Create a pseudo-random file name.
    fileExcel = "t" & nRandom.Next().ToString() & ".xls"
    
    'Set a virtual folder to save the file.
    'Make sure that you change the application name to match your folder.
    filePath = Server.MapPath("\ExcelVBTest")
    fileName = filePath & "\" & fileExcel
    
    'Use FileStream to create the .xls file.
    objFileStream = New FileStream(fileName, FileMode.OpenOrCreate, FileAccess.Write)
    objStreamWriter = New StreamWriter(objFileStream)
    
    'Use a DataReader to connect to the Pubs database.
    cnn.Open()
    Dim sql As String = "select au_id,au_lName,au_fname,phone," & _
                        "address,city,state,zip,contract from authors"
    Dim cmd As SqlCommand = New SqlCommand(sql, cnn)
    Dim dr As SqlDataReader
    dr = cmd.ExecuteReader()
    
    'Enumerate the field names and records that are used to build the file.
    For i = 0 To dr.FieldCount - 1
       strLine = strLine & dr.GetName(i).ToString & Chr(9)
    Next
    
    'Write the field name information to file.
    objStreamWriter.WriteLine(strLine)
      
    'Reinitialize the string for data.
    strLine = ""
    
    'Enumerate the database that is used to populate the file.
    While dr.Read()
       For i = 0 To dr.FieldCount - 1
          strLine = strLine & dr.GetValue(i) & Chr(9)
       Next
       objStreamWriter.WriteLine(strLine)
       strLine = ""
    End While
    
    'Clean up.
    dr.Close()
    cnn.Close()
    objStreamWriter.Close()
    objFileStream.Close()
    
    'Show a link to the Excel file.
    HyperLink1.Text = "Open Excel"
    HyperLink1.NavigateUrl = fileExcel
    					
  9. Pada Berkas menu, klik Simpan semua untuk menyimpan file proyek.
  10. Pada Bangun menu dalam Visual Studio.NET Integrated Development Environment, klik Bangun untuk membangun proyek.
  11. Dalam Visual Studio.NET lingkungan pengembangan terintegrasi solusi Explorer, klik kanan WebForm1.aspx Web bentuk, dan kemudian klik Lihat dalam Browser untuk menjalankan kode.

Pemecahan Masalah

  • Anda harus mengubah rangkaian sambungan dalam kode contoh untuk lingkungan Anda.
  • Anda mungkin harus meningkatkan izin untuk aspnet_wp proses untuk memungkinkan file untuk ditulis.Untuk informasi tambahan, klik nomor artikel di bawah ini untuk melihat artikel di dalam Basis Pengetahuan Microsoft:
    317012 INFO: Proses dan permintaan identitas di ASP.NET

Properti

ID Artikel: 308247 - Kajian Terakhir: 24 September 2011 - Revisi: 2.0
Berlaku bagi:
  • Microsoft ASP.NET 1.1
  • Microsoft ASP.NET 1.0
  • Microsoft Visual Basic .NET 2003 Standard Edition
  • Microsoft Visual Basic .NET 2002 Standard Edition
Kata kunci: 
kbdatabase kbhowtomaster kbio kbmt KB308247 KbMtid
Penerjemahan Mesin
PENTING: Artikel ini diterjemahkan menggunakan perangkat lunak mesin penerjemah Microsoft dan bukan oleh seorang penerjemah. Microsoft menawarkan artikel yang diterjemahkan oleh seorang penerjemah maupun artikel yang diterjemahkan menggunakan mesin sehingga Anda akan memiliki akses ke seluruh artikel baru yang diterbitkan di Pangkalan Pengetahuan (Knowledge Base) dalam bahasa yang Anda gunakan. Namun, artikel yang diterjemahkan menggunakan mesin tidak selalu sempurna. Artikel tersebut mungkin memiliki kesalahan kosa kata, sintaksis, atau tata bahasa, hampir sama seperti orang asing yang berbicara dalam bahasa Anda. Microsoft tidak bertanggung jawab terhadap akurasi, kesalahan atau kerusakan yang disebabkan karena kesalahan penerjemahan konten atau penggunaannya oleh para pelanggan. Microsoft juga sering memperbarui perangkat lunak mesin penerjemah.
Klik disini untuk melihat versi Inggris dari artikel ini:308247

Berikan Masukan

 

Contact us for more help

Contact us for more help
Connect with Answer Desk for expert help.
Get more support from smallbusiness.support.microsoft.com