|  Startsida |  Hårdvara |  Nätverk |  Programmering |  Programvara |  Felsökning |  System |   
Programmering
  • C /C + + -programmering
  • Computer Programspråk
  • Delphi Programmering
  • Java Programming
  • JavaScript programmering
  • PHP /MySQL Programmering
  • perl Programmering
  • python Programming
  • Ruby programmering
  • Visual Basics Programmering
  • * Dator Kunskap >> Programmering >> Visual Basics Programmering >> Content

    Hur man bygger en fil Tabbavgränsad Från ASP

    Microsoft har sitt eget programmeringsspråk - ASP.net , vilket står för Active Server Pages . Denna applikation körs i IIS ( Internet Information Services ) , som är en fri komponent i vissa Microsoft-operativsystem , som Windows 2000 och Windows NT 4.0 . Du kan använda ASP för olika projekt , som att skapa rapporter och bygga webbsidor . ASP kan innehålla element såsom HTML-taggar och skript , så det är mycket flexibel och lätt att använda . Instruktioner
    1

    Run Microsoft Visual Studio. NET . Peka på " Nytt " på Arkiv-menyn , och klicka sedan på " Project . " När dialogrutan Nytt projekt dyker upp , klicka på " Visual Basic Project " från projekttyper , och sedan under Mallar , klicka på " ASP.NET Web Application . "
    2

    Type " ExcelVBTest " i namnet rutan och klicka på lämplig server i rutan Plats . Lämna servern namn som " http://localhost , " om dina filer är inrymt i den lokala servern , och klicka på " OK . " Dra en " HyperLink " kontroll från verktygslådan till webbformuläret i WebForm1.aspx filen . Högerklicka på " WebForm1.aspx " filen och klicka sedan på " Visa kod " för att visa ditt projekts källkod
    3

    Klistra in koden nedan till toppen av sidan : .

    Imports System.Data

    Imports System.Data.Common

    Imports System.Data.SqlClient

    Imports System.IO

    Import System.Text

    Och sedan inkludera den efterföljande koden till " Page_Load " händelse :

    Dim i As Integer

    Dim strLine As String , filepath , filnamn fileExcel , länk

    Dim objFileStream Som FileStream

    Dim objStreamWriter Som StreamWriter

    Dim nRandom Som Random = Ny Random ( DateTime.Now.Millisecond ) katalog

    Dim fs As Object , myFile As Object

    Dim cnn Som SqlConnection = Ny SqlConnection ( " server = ( lokal ) , databas = pubar , " & _

    " Integrated Security = SSPI " ) katalog < p > ' Skapa en pseudo - random filnamn .

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

    " Ställ en virtuell mapp att spara fil .

    " se till att du ändrar programmets namn för att matcha din mapp .

    filepath = Server.MapPath ( " \\ ExcelVBTest " ) katalog

    filename = filepath & " \\ " & fileExcel

    " Använd FileStream för att skapa den . xls-fil .

    objFileStream = Ny FileStream (filename , FileMode.OpenOrCreate , FileAccess.Write ) katalog

    objStreamWriter = Ny StreamWriter ( objFileStream ) katalog

    " Använd en DataReader att ansluta till Pubs -databasen .

    cnn.Open ( ) katalog

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

    " adress , stad , stat , zip , kontrakt från författarna "

    Dim cmd Som SqlCommand = Ny SqlCommand ( sql , CNN ) katalog

    Dim dr som SqlDataReader

    dr = cmd.ExecuteReader ( ) katalog

    " Räkna fältnamn och poster som används för att bygga upp filen .

    för i = 0 till DR . FieldCount - . . 1

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

    Nästa

    ' Skriv informationen fältnamnet till fil

    objStreamWriter.WriteLine ( strLine ) katalog

    ' initiera strängen för data.

    strLine = " "

    " Räkna den databas som används för att fylla i filen .

    dr.Read ( ) katalog

    För i = 0 att dr.FieldCount - 1

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

    Nästa

    objStreamWriter.WriteLine ( strLine )

    strLine = " "

    End Medan

    " Clean en länk till Excel-filen .

    HyperLink1.Text = "Öppna Excel "

    HyperLink1.NavigateUrl = fileExcel
    4

    Klicka " Save All" på Arkiv menyn för att spara projektfiler . Klicka på " Build " för att skapa projektet på Build -menyn i Visual Studio . NET Integrated Development Environment . Högerklicka på " WebForm1.aspx " formulär i Visual Studio . , NET Integrated Development Environment Solution Explorer och köra koden genom att klicka på " Visa i webbläsare . " Addera

    Tidigare:

    nästa:
    relaterade artiklar
    ·Hur du jämför Tid i Visual Basic
    ·Hur man installerar Visual Studio 6.0
    ·Designprojekt Ämnen i Visual Basic
    ·Konvertera strängar till objekt i VB
    ·Hur man ändra färgen på former i VB
    ·Visual Basic Tutorial --- Hur man skriver koder
    ·Skillnader mellan Visual Basic och Visual Basic Net
    ·Hur du trär i VB.Net
    ·Hur man kompilerar i VB
    ·Hur man skapar en textfil i Visual Basic 6
    Utvalda artiklarna
    ·Hur man driver en HTA fil från VBScript
    ·Så här visar du en webbadress Använda reguljära utt…
    ·PHP Flash Integration Tutorial
    ·Om en binär till Hex filkonvertering
    ·Hur till Ändra PHP Extensions
    ·Styra till en annan sida när Session Timeout i PHP
    ·Min Perl String Split inte fungerar
    ·Perl : Hur man byter Semikolon
    ·Säkerhetsdosa Fel i PHP
    ·Lägga till en DLL till en CPP Project
    Copyright © Dator Kunskap http://www.dator.xyz