Søg
Avatar billede flemming39 Nybegynder
27. april 2005 - 11:37 Der er 10 kommentarer og
1 løsning

sql opslag

Er der en venlig sjæl der kan fortælle mig hvordan jeg skal udføre et simpelt sql statement i VBA?

Jeg skal slå op i en access (2002) database og jeg har læst en masse herinde om connections og "dim as database" osv., men har brug for konkret hjælp. Skal jeg lave connection uanset at jeg udfører vba koden i en makro i databasen?

Eller kan jeg lave et "direkte" sql i vba koden (har forsøgt uden held :-)

Ydmygt
Flemming
Avatar billede mikkelk Nybegynder
27. april 2005 - 12:01 #1
Du kunne måske bruge DoCmd.RunSql("din SQL")
Avatar billede terry Ekspert
27. april 2005 - 12:09 #2
are you running a macro in Access FROM vb?

If so you need to automate Access

something like this

Dim ObjA As Access.Application

Set ObjA = CreateObject("Access.application")

With ObjA

.Visible = True 'Remove if you dont want to see Access

.docmd.RunMacro "NameOf macro"

End With

Set ObjA = Nothing
Avatar billede terry Ekspert
27. april 2005 - 12:10 #3
and you need a reference to Access to do this.
Avatar billede terry Ekspert
27. april 2005 - 12:17 #4
which means that Access MUST be installed too. If not then you can NOT run macro's you only have access to the tables/queries
Avatar billede flemming39 Nybegynder
27. april 2005 - 12:48 #5
Nej Terry du misforstår min meget utydelige formulering

Jeg bruger afspiller noget vba kode i en makro i min access db.
Jeg tror løsningen er at bruge docmd.runsql men.....

DoCmd.RunSQL ("select måler_nr as start_date from konv_elektronisk_fil where ejendom = var1;")

giver fejl "kræver et argument der består af en sql sætning" og jeg har prøvet at bytte en del rundt nogen der lige kan se hvad der er galt?
Avatar billede terry Ekspert
27. april 2005 - 12:59 #6
Use Dlookup("[ler_nr]", "konv_elektronisk_fil", "ejendom = " & var1)
Avatar billede terry Ekspert
27. april 2005 - 13:03 #7
that should be

Var = Dlookup("[måler_nr ]", "konv_elektronisk_fil", "ejendom = " & var1)
Avatar billede terry Ekspert
27. april 2005 - 13:04 #8
and if ejendom is a string
then

Var = Dlookup("[måler_nr ]", "konv_elektronisk_fil", "ejendom = '" & var1 & "'")
Avatar billede terry Ekspert
27. april 2005 - 13:09 #9
If there is more than one record then you should use Dfirst or Dlast
Avatar billede flemming39 Nybegynder
27. april 2005 - 14:01 #10
Hi Terry

Thanks again, this was exactly what I needed.

Have a nice day
Avatar billede terry Ekspert
27. april 2005 - 14:47 #11
thanks and a nice day to you too
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel Indlæg Oprettet Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic 5 29/08/202512:28 04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic 0 05/08/202510:10 -
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic 0 16/05/202512:31 -
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic 1 22/04/202514:55 25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic 12 10/07/202417:34 12/07/202414:34
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 14:53 TV4ever 3.0 Af valby i Diverse
I går 16:21 Installere Ubuntu på Virtuel Maskine Af Uvanga i Andet software
I går 09:38 Microsoft har igen ødelagt mit højreklik Af valby i Windows
30/0714:41 To mails fra YouSee - Jeg tror ikke altid på tilfældigheder Af mort1 i Andet sikkerhed
27/0714:34 Hjælp til at kunne skanne negativer på Plustek 8300i SE Af Mariann i Foto & video
White papers
Flere white papers »