Ett av ansvarsområdena för webbdesigners och tekniska skribenter är att ha förmågan att hämta information från en databas . Visual Basic eller VB , är en händelsestyrd programmeringsspråk som har utvecklats av Microsoft för att göra det möjligt för utvecklare att skapa program för operativsystemet Windows . På grund av det sätt på vilket språket fungerar , kan den också användas för att visa dynamiska data . XML , eller Extensible Markup Language , är en form av kodning som är utformad för transport och lagra data . Instruktioner
1
Starta en databasanslutning . Detta uppnås genom att skapa en anslutning objekt , som låter dig få information om databasen . Standarden kod för att skapa en databas anslutning till en Access-databas följer . Observera att namnet på databasen kommer att vara " myserver . " Ange denna kod :
Dim conn som OleDbConnectionconn = Ny OleDbConnection ( " Provider = Microsoft.Jet.OLEDB.4.0 , datakälla = " myDB.mdb " )
2
Skapa ett fråga . Detta kommer att göra det möjligt för programmet att hämta information från databasen som ska användas för XML-filen . för demonstrationsändamål kommer informationen hämtas vara den första och sista namnet på en kundlista , kommenterad av " förnamn, efternamn från kund . " följande bit av kod skapar en fråga och sedan tilldelar uppgifter till en DataReader objekt :
conn.Open ( ) query = " select customerId , förnamn, efternamn från kund " command = Ny OleDbCommand ( query , conn ) läsare = dbcomm.ExecuteReader ( )
3
Öppna en ny XML -fil och ange start -taggen , som fungerar som din rot i XML-dokumentet . Återigen, för syftet med denna demonstration , roten taggen är märkt som " . kund " koden är som följer :
Dim XML som New XmlTextWriter ( " customer.xml " , System.Text.Encoding.UTF8 ) xml.WriteStartDocument ( sant) xml . Formatera = Formatting.Indentedxml.Indentation = 2xml.WriteStartElement ( " kunden " )
4
Fortsätt att fylla i varje XML-fil med kundinformation eller post. Här är ett exempel på ett sätt att slinga genom databasen läsaren och skriva varje fil :
Gör medan
5
Stäng dokumentet genom att ange slutet tagg i XML-fil Ett exempel skulle vara : .
xml.WriteEndElement ( ) xml.WriteEndDocument ( ) xml.Close ( ) katalog
Addera
