December 23
Microsoft ha un proprio linguaggio di programmazione - ASP.net, che sta per Active Server Pages. Questa applicazione viene eseguita all'interno di IIS (Internet Information Services), che è un componente gratuito di alcuni sistemi operativi Microsoft, come Windows 2000 e Windows NT 4.0. È possibile utilizzare ASP per vari progetti, come ad esempio la creazione di report e la costruzione di pagine web. ASP può contenere elementi quali tag HTML e script, quindi è molto flessibile e facile da usare.
1 Eseguire Microsoft Visual Studio .NET. Punto a "Nuovo" dal menu File, quindi fare clic su "Progetto". Quando la finestra di dialogo Nuovo progetto si apre, fare clic su "Progetto di Visual Basic" dai tipi di progetto, e in Modelli, quindi fai clic su "Applicazione Web ASP.NET."
2 Tipo "ExcelVBTest" nella casella Nome e fare clic sul server appropriato nella casella Posizione. Lasciare il nome del server come "http: // localhost," se i file sono ospitati in server locale, e fare clic su "OK". Trascinare un controllo "collegamento ipertestuale" dalla casella degli strumenti al Web Form nel file WebForm1.aspx. Fare clic sul file "WebForm1.aspx", e quindi fare clic su "Visualizza codice" per visualizzare il codice sorgente del progetto.
3 Incollare il codice di seguito per la 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 riuscendo all'evento "Load":
Dim i As Integer
Dim strLine come stringa, filePath, nome del file, fileExcel, collegamento
Dim objFileStream Come FileStream
Dim objStreamWriter Come StreamWriter
Dim nRandom come casuale = new Random (DateTime.Now.Millisecond)
fs fiochi come oggetto, myFile come oggetto
Dim CNN come SqlConnection = new SqlConnection ( "server = (locali); database = pubs;" & _
"Integrated Security=SSPI")
'Creare un nome di file pseudo-casuale.
fileExcel = "t" e nRandom.Next (). ToString () & ".xls"
'Impostare una cartella virtuale per salvare il file.
'Assicurarsi che si cambia il nome dell'applicazione per abbinare il vostro cartella.
filePath = Server.MapPath ( "\ ExcelVBTest")
filename = filePath & "\" & fileExcel
'Usa FileStream per creare il file .xls.
objFileStream = nuovo FileStream (nome del file, FileMode.OpenOrCreate, FileAccess.Write)
objStreamWriter = Nuovo StreamWriter (objFileStream)
'Utilizzare un DataReader per la connessione al database pubs.
cnn.Open ()
Sql Dim As String = "select au_id, au_lname, au
fname, telefono," &
"address,city,state,zip,contract from authors"
Dim cmd Come SqlCommand = nuovo SqlCommand (SQL, CNN)
dr fioco come SqlDataReader
dr = cmd.ExecuteReader ()
'Enumerare i nomi dei campi ei record che vengono utilizzati per creare il file.
Per i = 0 Per dr.FieldCount - 1
strLine = strLine & dr.GetName (i) .ToString & Chr (9)
Il prossimo
'Scrivere le informazioni nome del campo in un file.
objStreamWriter.WriteLine (strLine)
'Reinizializzare la stringa per i dati.
strLine = ""
'Enumerare il database utilizzato per popolare il file.
Mentre dr.Read ()
Per i = 0 Per dr.FieldCount - 1
strLine = strLine & dr.GetValue(i) & Chr(9)
Il prossimo
objStreamWriter.WriteLine (strLine)
strLine = ""
End While
'Pulire.
dr.Close ()
cnn.Close ()
objStreamWriter.Close ()
objFileStream.Close ()
'Mostra un collegamento al file di Excel.
HyperLink1.Text = "Aprire Excel"
HyperLink1.NavigateUrl = fileExcel
4 Fai clic su "Salva tutto" dal menu File per salvare i file di progetto. Fai clic su "Build" per creare il progetto dal menu Genera del Visual Studio .NET ambiente di sviluppo integrato. Fare clic con il modulo "WebForm1.aspx" in Visual Studio .NET Integrated Development Environment Esplora soluzioni, ed eseguire il codice cliccando su "Visualizza nel browser."