Springen naar inhoud


- - - - -
DB .NET

Query In Ms-Access Database Maken Met Vb2013

.NET

  • Log in a.u.b. om te beantwoorden
Er zijn 1 reacties in dit onderwerp

#1 guido1

guido1

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 566 berichten
    Laatst bezocht 17 mrt 2018 17:18

Geplaatst op 25 februari 2018 - 19:28

Ik heb een project gemaakt in VB2013. Daarin maak ik een string aan die een query vormt.
1)   Die string moet in een Access database gesaved worden maar hoe doe ik dat?
2)   Hoe moet ik een bestaande query van een Access database runnen via mijn VB programma?

Dit is een voorbeeld van mijn code:

Visual Basic Code:
   Private Sub btn_Create_Query_Click(sender As Object, e As EventArgs) Handles btn_Create_Query.Click
		Dim verbindingsString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source=" & System.AppDomain.CurrentDomain.BaseDirectory() & "\Test.mdb"
		Dim strSQL As String = "SELECT t_soorten.srt, t_soorten.soort INTO t_soort_new FROM t_soorten;"

		MsgBox(strSQL)
		Clipboard.Clear()
		Clipboard.SetText(strSQL)
		Try
			Dim verbinding As New OleDb.OleDbConnection(verbindingsString)
			verbinding.Open()
			' Hier moeten de statements komen om in de Access database een query aan te maken
			Me.Close()
			MsgBox("Query aangemaakt")
		Catch ex As Exception
			MsgBox("FOUT: " & strSQL)
		End Try
	End Sub

	Private Sub btn_Run_Query_Click(sender As Object, e As EventArgs) Handles btn_Run_Query.Click
		'code om een bestaande query te laten runnen
	End Sub


Het project heb ik hier bijgevoegd.

Bijgevoegde Bestanden



#2 guido1

guido1

    Master Developer

  • Leden
  • PipPipPipPipPip
  • 566 berichten
    Laatst bezocht 17 mrt 2018 17:18

Geplaatst op 04 maart 2018 - 18:18

Wie weet raad?





Ook met taq DB .NET, .NET voorzien

0 gebruiker(s) lezen dit onderwerp

0 lid(leden), 0 bezoeker(s), 0 anonieme gebruikers

Inloggen


[DB .NET] Untitled 1

Met dank aan J├╝rgen voor de jarenlange inzet van visualbasic.be (anno dec 2000)
Met dank aan Mike en Ronneke voor de jarenlange inzet van vbib.be (anno dec 2010)
Met dank aan PascalBianca voor de jarenlange inzet van vbib.be (anno dec 2016)