In Visual Basic , het Object Linking and Embedding opslaan , databank ( OLE DB ) application programming interface kunt u uw programma verbinding met een database . Met het, kunt u informatie opslaan van uw project aan een tabel in uw database en opnieuw gebruiken in andere toepassingen . U kunt uw variabelen overal in uw project te maken , zoals van tekstvakken , selectievakjes of een lijst selecties , maar zorg ervoor dat uw type variabele data overeenkomt met het gegevenstype van het veld in de tabel van uw database. Instructies
Open Visual Basic 1 en start een nieuw project . Open het venster code en maak een functie door te typen " Private Sub AddRecord ( ) "
type 2 de volgende regels toe aan variabelen die zal aansluiten op uw database te maken : . Dim dbCon
als New OleDb.OleDbConnection Dim dataset
als Nieuwe Dataset Dim dataAdap
zoals OleDb.OleDbDataAdapter Dim SqlCommand
als Koord
De variabele " dbCon " legt een verbinding met uw database , " dataset " houdt de gegevens van het, " dataAdap " commando's uitvoert en de wisselwerking met de database , en " SqlCommand " houdt uw vragen .
3 verbinding met uw database met de volgende regels :
dbCon.ConnectionString = " Provider = Microsoft.Jet.OLEDB.4.0 ; data Source = path_to_database " dbCon.Open ( )
Vervang de " path_to_database " gedeelte met de fysieke locatie van uw database op uw computer . Deze lijn verbindt uw Visual Basic programma om uw database en de tweede regel opent de databank
Type 4 de volgende regels om de gegevens te laden van uw database : . SqlCommand
= " SELECT * FROM tblContacts " dataAdap = Nieuw OleDb.OleDbDataAdapter ( SqlCommand , dbCon ) dataAdap.Fill ( dataset , verkoop, " Database " ) Uw gegevens adapter
heeft nu al de records in uw tafel . U kunt een andere dan " Database " om uw tafel beter te identificeren naam te gebruiken . Bijvoorbeeld , als uw tabel bevat contactgegevens informatie, kunt u de naam van deze " Contacten "
5 Maak de volgende variabelen : . Dim comBuild
als Nieuwe OleDb.OleDbCommandBuilder ( dataAdap ) < br Dim dataNewRow als DataRow
> De eerste regel valideert een insert commando in uw tafel wanneer u een DataRow . De tweede regel maakt het DataRow object
Type 6 de volgende regels toe aan een nieuwe rij toe te voegen aan de tabel in uw database en sla uw variabelen om velden in de record : . DataNewRow
= dataSet.Tables ( " Database " ) . NewRow ( ) dataNewRow.Item
( 1 ) = variabele1 dataNewRow.Item
( 2 ) = variabele2 dataNewRow.Item
( " field_name " ) = variable3 dataSet.Tables
( " Database " ) . Rows.Add ( dataNewRow ) dataAdap.Update
( dataset , " Database " ) op Twitter de eerste regel bereidt een nieuw record met lege velden . De volgende drie regels toe te voegen informatie . De eerste twee gebruik maken van de indexcijfers van de tafel velden en steek deze variabelen in de eerste en tweede veld in de record . De derde gebruikt de veldnaam te identificeren welk veld die variabele op te slaan . De vijfde en zesde regels toe het record met uw variabelen aan uw tafel en plegen de gegevens
7 Typ de volgende regel om de verbinding met uw database : . DbCon.Close
( ) op Bel uw " AddRecord ( ) " functie elders in de code , zoals in een druk op de knop evenement .
|
