gegevens uit listbox printen

[Siel]

Ik zit weer eens met een probleem, ik heb eindelijk een zoekfunctie volledig aan de praat (de gegevens records komen nu in een listbox te staan), maar nu wil ik de gegevens die in de listbox komen te staan uitprinten. Helaas kom ik er niet uit. Heb al op het forum gezocht en op google gezocht, maar helaas kom ik met de informatie die ik daar vind geen steek verder. Ik heb ook geprobeerd om de gegevens door te sturen naar een rapport, maar dat gaat niet als ik meer dan 1 record door wil sturen ( het kan ook zijn dat ik iets vreselijk verkeerd doe). Kan iemand mij hiermee helpen??

Wilco

 

[Guus2005]

Je listbox bestaat uit een aantal regels die we records zullen noemen. Schrijf die records weg naar een tijdelijke tabel en basseer je rapport op die tijdelijke tabel. Run nu het rapport.

Dit is slechts één mogelijkheid.

BTW rar kan ik niet lezen.

Enjoy!

 

[Siel]

call me stupid , maar hoe schrijf ik ook alweer weg naar een tijdelijke tabel? (ik zal zometeen ook even een zip plaatsen ipv een rar)

 

[Tardis]

maar hoe schrijf ik ook alweer weg naar een tijdelijke tabel

Door een toevoegquery te draaien.
Zul je in dit geval met VBA moeten doen.

Groet,

Tardis

 

[Tardis]

PS je code om de RowSource van je listbox op te stellen klopt niet, zie

http://www.helpmij.nl/forum/showthread.php?t=303530

Toevallig niet beiden met een opdracht voor school bezig

Groet,

Tardis

 

[Siel]

Niet helemaal, ben bezig met een opdracht voor mijn stage. ik zal meteen even kijken naar de code, dacht dat ie wel goed in elkaar stak dit keer maar helaas maar heb je nog een tip over een tijdelijke tabel maken? ik vind op google namelijk wel een hele hoop mensen die het gebruiken, maar ze leggen nooit uit hoe ze het nou eigenlijk gedaan hebben

 

[Tardis]

Er zijn meerdere mogelijkheden, dit is er een van.
Ik geef je de aanpak, verder zelf uitwerken

Maak een knop.
Zet in de Bij Klikken gebeurtenis qua opzet deze code (DoCmd volgorde aanhouden):

Dim strRowsource As String

strRowsource = Me.lstSelectie.Rowsource

DoCmd.RunSQL "DROP TABLE tblTemp;"
DoCmd.RunSQL "CREATE TABLE tblTEMP (kolom1 Integer, kolom2 Text, kolom3 Date);" 
DoCmd.RunSQL "INSERT INTO tblTmp " & strRowsource

DROP TABLE, CREATE TABLE en INSERT INTO staan beschreven in VBA Help.

Groet,

Tardis

 

[Rommyke]

PS je code om de RowSource van je listbox op te stellen klopt niet, zie

http://www.helpmij.nl/forum/showthread.php?t=303530

Toevallig niet beiden met een opdracht voor school bezig

Groet,

Tardis

Tardis ,

Denk dat ik een beetje te oud ben voor school

Die tijd is sebiet al 20j gepasseerd

Zie er misschien jong uit voor mijn leeftijd maar ook niet zo jong

Vrouw zal blij zijn

 

[Tardis]

Die tijd is sebiet al 20j gepasseerd

Dan weet ik hoe je je voelt

Groet,

Tardis (ook al heeeeeeeeeeeeeeeeel lang uit de schoolbanken)

 

[Siel]

zo klaar. Bij deze: Tardis heel erg bedankt voor het praktisch in mijn schoot werpen van het antwoord nu nog even een goed formulier maken om uit te printen en dan is ie af.

Hier nog even een paar kleine dingetjes waar ik tegenaan liep, zodat een ieder die dit leest niet dezelfde fouten maakt

voordat je DROP TABLE kunt doen moet er wel eerst een tabel aangemaakt zijn, dus voordat je de eerste keer de code gebruikt, even een tabel met dezelfde naam aanmaken.

vergeet bij CREATE TABLE de [] niet om de kolomnamen heen te zetten

en vergeet de spatie niet na de tabelnaam bij INSERT INTO


Nogmaals bedankt Tardis