Toon posts:

van Record naar variabele in VB

Pagina: 1
Acties:

Verwijderd

Topicstarter
Hallo,

Ik wil graag gegevens uit tabellen gebruiken in variabelen in Visual Basic. Iemand enig idee hoe dit op een simpele manier kan?

Groeten,

GalvatronX

  • robjanssen
  • Registratie: September 2001
  • Laatst online: 02-08 16:10

robjanssen

Software Developer

code:
1
variabele = gegeven uit tabel

  • pjonk
  • Registratie: November 2000
  • Laatst online: 29-12-2025
Je bent wel erg scheutig met je informatie. Wat voor database gebruik je?
Keywords zijn ADO, DAO, ODBC ga daar maar eens op zoeken.

It’s nice to be important but it’s more important to be nice


Verwijderd

Topicstarter
Inderdaad wat scheutig.

Ik werk met een lokale MS Access 2002 Database. Ik wil graag vanuit de tabellen gegevens ophalen en vervolgens in variabelen stoppen die ik in Visual basic code aanmaak.

Op die manier kan ik mijn programma's bijvoorbeeld aanpassen aan de data in de database (bv. gedeelten van de applicatie afschermen voor gebruikers*). Iets dat me nu dus nog niet lukt. Hopelijk kunnen jullie me nu beter helpen.

Hopelijk heb ik jullie nu van wat meer informatie voorzien.


* Ik ben overigens op de hoogte van de beveiligingsmogelijkheden in Access, maar ik wil eens op een andere manier proberen.

  • robjanssen
  • Registratie: September 2001
  • Laatst online: 02-08 16:10

robjanssen

Software Developer

Als je met een SELECT query data uit de een tabel uit een Access database haalt.
Dan kun je toch een waarde uit die tabel toekennen aan een variabele?

Waar gaat het mis dan?
Wat heb je al geprobeerd?

Verwijderd

Topicstarter
Ik wil de informatie uit de database kunnen inlezen in mijn code.

Stel ik heb een applicatie waar diverse medewerkers toegang toe hebben, dan wil datgene dat de medewerkers te zien krijgen regelen door per medewerker in een tabel te regelen welke formulieren ze wel of niet te zien krijgen. Dus als mijn applicatie uit de volgende formulieren bestaat:

Startformulier (bevat knoppen naar A, B, C, D)
formulier A
formulier B
formulier C
formulier D

Dan kan de rollentabel er bv. zo uitzien:

RolID | RolNaam | A | B | C | D |
-----------------------------------------------------
1 | Beheerder | ja | ja | ja | ja |
2 | secretaresse | ja | ja | nee| nee|
3 | manager |ja | nee | ja | nee |

Dus om mijn applicatie te creeren wil ik op basis van de rol die op mijn database inlogd de informatie uit de rollentabel inlezen in visual basic code. Hiermee kan ik vervolgens knoppen op het startformulier verbergen, zodat iedere gebruiker alleen datgene krijgt wat hij/ zij nodig heeft.

Om dit te doen moet ik dus de informatie uit een tabel inlezen in mijn code. Dus nogmaals, hoe krijg ik zoiets dergelijks voor elkaar???????

Groeten,

GalvatronX

  • robjanssen
  • Registratie: September 2001
  • Laatst online: 02-08 16:10

robjanssen

Software Developer

Zoek een naar DataEnvironment in Visual Basic, daarmee kun je een connectie maken naar je Access database. Vervolgens kun je met die Connectie een query uitvoeren die de gegevens uit de rollentabel haalt voor de ingelogde Medewerker.
Aan de hand van wat er uit de query komt laat je dan de knoppen zien.

Verwijderd

Topicstarter
Is het niet mogelijk door middel van code in VB die de tabel leest en de juiste gegevens aan je retourneert in een Array of een variabele?

Het is me in ieder geval niet duidelijk hoe ik dit via een data environment zou moeten doen.

  • robjanssen
  • Registratie: September 2001
  • Laatst online: 02-08 16:10

robjanssen

Software Developer

Je kunt ook via ADODB.Connection een connectie maken naar Access.

Probeer dit eens:

code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Dim Conn As ADODB.Connection
Dim rsTmp As ADODB.Recordset
Dim strConnectionString As String

strConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Temp\Database.mdb;Persist Security Info=False"
Set Conn = New Connection
Conn.Open strConnectionString

strSQL = "SELECT RolID, RolNaam, A, B, C, D " _
            & "FROM rollentabel " _
            & "WHERE RolID = " & CStr(lngRolID)
Set rsTmp = New RecordSet
rsTmp.Open strSQL, Conn, 0, 1
If Not rsTmp.EOF Then
  'code
End If
rsTmp.Close
Set rsTmp = Nothing

Conn.Close
Set Conn = Nothing

Verwijderd

ik begrijp het ff niet,
wil je Visual Basic gebruiken vannuit Access zelf, of vanuit ASP?

Verwijderd

Topicstarter
Bedankt iedereen.

Ik ben er nu uit. Door middel van de methode GetRows kan ik een variabele volschrijven met de recordset die ik nodig heb. Vervolgens kan ik de variabele benaderen als een gewone array.
Pagina: 1