Wie man eine Datei Tabulatorgetrennt Von ASP Bauen

Mitglieder-Login

InformationenVisual Basics Programmierung

Wie man einen Tangent -Code für ei… ? Trigonometrie ist nicht ein beliebtes Thema für Menschen, die das nicht tun gut mit math. Ein wiss
Wie kommt man zum Clipboard in Micr… Es ist nützlich zu wissen, wie die Zwischenablage des Systems verwenden, um Informationen aus einer
Wie Serial Ports Mit Lesen Visual B… Auch wenn Modems mit Highspeed-Internetzugang ersetzt worden , einige Computer noch nutzen sie für d
Wie Sie das erste Element in der Co… Dynamisch zeigt das erste Element in einer Combo-Box -Steuerung können Sie Ihre Anwendung noch benut

Programming

HOME

* Computer Wissen >> Programming >> Visual Basics Programmierung >> .

Wie man eine Datei Tabulatorgetrennt Von ASP Bauen

Microsoft hat seine eigene Programmiersprache - ASP.net , die für Active Server Pages steht . Diese Anwendung läuft in IIS (Internet Information Services) , die eine kostenlose Komponente bestimmter Microsoft-Betriebssysteme wie Windows 2000 und Windows NT 4.0 handelt. Sie können ASP für verschiedene Projekte , wie z. B. das Erstellen von Berichten und Erstellung von Web- Seiten verwenden . ASP kann Elemente wie HTML -Tags und Skripts enthält , so ist es sehr flexibel und einfach zu bedienen. Anleitung
1

Run Microsoft Visual Studio. NET . Zeigen Sie auf "Neu" im Menü Datei , und klicken Sie dann auf " Project". Wenn das Dialogfeld Neues Projekt erscheint, klicken Sie auf " Visual Basic -Projekt" aus dem Projekt , und klickt dann unter Vorlagen , klicken Sie auf " ASP.NET Web Application . "
2

Type " ExcelVBTest " im Namen und klicken Sie auf den entsprechenden Server in das Feld Ort . Lassen Sie den Server-Namen wie " http://localhost ", wenn Sie Ihre Dateien in Ihrem lokalen Server untergebracht sind , und klicken Sie auf "OK". Ziehen Sie ein "Hyperlink" -Steuerelement aus der Toolbox auf das Web-Formular in der Datei WebForm1.aspx . Rechten Maustaste auf das " WebForm1.aspx "-Datei , und klicken Sie dann auf " Code anzeigen " , um Ihr Projekt den Quellcode anzuzeigen
3

Fügen Sie den Code unten, um oben auf der Seite: .

Imports System.Data

Importe System.Data.Common

Imports System.Data.SqlClient

Imports System.IO

Importe System.Text

Und dann gehören die folgenden Code in das " Page_Load " event:

Dim i As Integer Dim

strLine As String , filePath , Dateiname fileExcel , link

Dim objFileStream Wie FileStream

Dim objStreamWriter Wie StreamWriter

Dim nRandom als Random = New Random ( DateTime.Now.Millisecond )

Dim fs As Object , myFile As Object Dim cnn

Wie SqlConnection = New SqlConnection ( " Server = (local ); database = Pubs ; " & _

" Integrated Security = SSPI " )
< p > ' erstellen einer pseudo -zufälligen Dateinamen.

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

" Legen Sie einen virtuellen Ordner zu speichern die Datei.

" Stellen Sie sicher, dass Sie den Namen der Anwendung , um Ihre Ordner entsprechen ändern.

filePath = Server.MapPath (" \\ ExcelVBTest " )

filename = filePath & " \\ " & fileExcel

'Use FileStream , um die . xls -Datei zu erstellen .

objFileStream = New FileStream (Dateiname , FileMode.OpenOrCreate , FileAccess.Write )

objStreamWriter = New StreamWriter ( objFileStream )

"Verwendung eines DataReader auf der Pubs-Datenbank zu verbinden.

cnn.Open ()

Dim sql As String =" select au_id , au_lname au_fname , Telefon, "& _

" Adresse , Stadt , Bundesland, Postleitzahl , Vertrag von Autoren "

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

Dim dr Wie SqlDataReader

dr = cmd.ExecuteReader ()

' Zählen Sie die Feldnamen und Datensätze, die verwendet werden, um die Datei zu bauen .

For i = 0 To dr. FieldCount - . . 1 of

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

Weiter

den Namen des Feldes Informationen schreiben "To file

objStreamWriter.WriteLine ( strLine )

' Reinitialize die Zeichenfolge für Daten.

strLine = ""

' die Datenbank, die verwendet werden, um die Datei zu füllen ist Aufzählen .

Während dr.Read ()

For i = 0 To dr.FieldCount - 1 of

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

Weiter

objStreamWriter.WriteLine ( strLine )

strLine = "" End While

'Clean ein Link auf die Excel-Datei.

HyperLink1.Text = "Excel "

HyperLink1.NavigateUrl = fileExcel
4

Klicken Sie "Save All " auf der Datei Menü zum Speichern der Projektdateien. Klicken Sie auf " Erstellen ", um das Projekt auf dem Menü Erstellen in der Visual Studio. NET Integrated Development Environment . Rechten Maustaste auf das " WebForm1.aspx " Formular in Visual Studio. NET Integrated Development Environment Explorer , und führen Sie den Code , indem Sie auf "View in Browser ".