Microsoft ha un proprio linguaggio di programmazione - ASP.net, che l'acronimo di Active Server Pages. Questa applicazione viene eseguita all'interno di IIS (Internet Information Services), che è un componente gratuito di determinati sistemi operativi di Microsoft, quali Windows 2000 e Windows NT 4.0. È possibile utilizzare ASP per vari progetti, come ad esempio la creazione di report e creazione di pagine Web. ASP può contenere elementi come tag HTML e script, quindi è molto flessibile e facile da usare.

Istruzioni

1

Eseguire Microsoft Visual Studio .NET. Scegliere "Nuovo" dal menu File e quindi fare clic su "Progetto". Quando si apre la finestra di dialogo nuovo progetto, fare clic su "Progetto di Visual Basic" dai tipi di progetto e quindi in modelli, fare clic su "Applicazione ASP.NET Web."

2

Digitare "ExcelVBTest" nella casella nome e scegliere il server appropriato nella casella percorso. Lasciare il nome del server come "http://localhost," se i file sono ospitati nel server locale e fare clic su "OK". Trascinare un controllo "Collegamento ipertestuale" dalla casella degli strumenti al Web form nel file WebForm1. aspx. Pulsante destro del mouse il file "WebForm1. aspx" e quindi fare clic su "Visualizza codice" per visualizzare il codice sorgente del progetto.

3

Incollare il codice riportato di seguito nella parte superiore della pagina:

Imports System. Data

Le importazioni System.Data.Common

Imports System.Data.SqlClient

Imports System.IO

Imports System. Text

E quindi includere il codice successivo all'evento "Page_Load":

Dim i As Integer

Dim strLine As String, filePath, fileName, fileExcel, link

Dim objFileStream As FileStream

Dim objStreamWriter As StreamWriter

Dim piggei 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")

' Creare un nome di file pseudo-casuali.

fileExcel = "t" & nRandom.Next(). ToString () & ". xls"

' Impostare una cartella virtuale per salvare il file.

' Assicurarsi che si modifica il nome dell'applicazione per associare la cartella.

filePath = Server.MapPath("\ExcelVBTest")

fileName = filePath & "\" & fileExcel

' Utilizzare FileStream per creare il file xls.

objFileStream = nuovo FileStream(fileName, FileMode.OpenOrCreate, FileAccess.Write)

objStreamWriter = nuovo StreamWriter(objFileStream)

' Utilizzare un DataReader per connettersi al database Pubs.

CNN. Open)

Dim sql As String = "select au_id, au_lName, aufname, telefono cellulare," &

"address,city,state,zip,contract from authors"

Dim cmd As SqlCommand = New SqlCommand(sql, cnn)

Dim dr As SqlDataReader

Dr = cmd. ExecuteReader)

' Enumerare i nomi di campo di record che vengono utilizzati per creare il file.

For i = 0 To dr. FieldCount - 1

strLine = strLine & dr. GetName (i). ToString & Chr(9)

Successivo

' Scrivere le informazioni del campo nome file.

objStreamWriter.WriteLine(strLine)

' Reinizializza la stringa per i dati.

strLine = ""

' Enumerare il database che viene utilizzato per compilare il file.

Mentre dr. Read)

For i = 0 To dr. FieldCount - 1

strLine = strLine & dr.GetValue(i) & Chr(9)

Successivo

objStreamWriter.WriteLine(strLine)

strLine = ""

End While

' Clean up.

Dr. Close)

CNN. Close)

objStreamWriter.Close()

objFileStream.Close()

' Visualizza un collegamento al file Excel.

HyperLink1.Text = "Apri Excel"

HyperLink1. NavigateUrl = fileExcel

4

Fare clic su "Save All" dal menu File per salvare i file di progetto. Fare clic su "Build" per creare il progetto dal menu Genera in Visual Studio .NET Integrated Development Environment. Del mouse sul form "WebForm1. aspx" in Visual Studio .NET Integrated Development Environment Esplora ed eseguire il codice facendo clic su "Visualizza nel Browser."

Consigli & Avvertenze

• Microsoft offre tutorial gratuiti online sugli usi di ASP.net e Visual Basic. Anche, partecipare a forum di discussione per consentire di cercare consigli e consigli da utenti esperti di ASP.