Jeg har en access applikation hvor jeg bruger en Dlookup på en låst tekstboks til at slå navnet på en kommune op (når brugeren har indtastet postnr i et åbent tekstfelt)
Mit problem, er når tekstfeltet "Postnr" er tom, så returnere Dlookup "#fejl" og det er ikke særlig prangerne på min fine applikation at der står #fejl :)
Er kan jeg fjerne #fejl indtil der bliver tastet data i postnr feltet?
Teknologi, AI og forretning er i centrum på Computerworlds Cloud og AI Festival i København d. 18. og 19. september. Se hele programmet for den store konference om strategisk brug af Cloud og AI på: www.cloud-festival.dk
I stedet for at manipulere med tekststrengen, foretrækker jeg at behandler den opståede fejl. Det er korrekt, som Christian skriver, at fejlen opstår fordi der ikke er nogen værdi der svarer til feltet Postnr. I nedenstående eksempel elimineres fejlen, da koden går til den linie, der kommer efter linien med fejlen. Man kan naturligvis vælge en anden hændelse hvis fejlen opstår som f.e.ks en meddelelsesboks:
on error goto errorhandler =DLookUp("[Kommune_navn]","Kommune","[Postnr] = " & [Postnr]) errorhandler: Resume next
Mugs, når jeg forsøger med din formel kommer access med en fejlmeddelse: "Expected: line number or label or statement or end of statement"
Det jeg forsøger at indtaste er:
Private Sub Postnr_BeforeUpdate(Cancel As Integer) on error goto errorhandler =DLookUp("[Kommune_navn]","Kommune","[Postnr] = " & [Postnr]) errorhandler: Resume next End sub
arnejensen22, hvordan kommer vi videre med dette spoergsmaal? Fik du loest problemet ved hjaelp af indlaeggene? I saa fald maa du uddele points og lukke spoergsmaalet. Eller har du behov for yderligere hjaelp? I saa fald fortael. Eller loeste du det selv eller er det i mellemtiden ikke laengere aktuelt? I saafald maa du selv oprette og acceptere et svar og derved lukke spoergsmaalet. Det vi gerne skulle undgaa er at spoergsmaalet bliver haengende som et evigheds-aabent spoergsmaal.
Saafremt du som nyt medlem ikke ved det, saa lukker man et spoergsmaal ved at acceptere et svar, et indlaeg markeret med gult, som #2 ovenfor. Man accepterer svaret ved at saette et flueben i den lille firkant og derefter i det felt der opstaar, "Accepter svar og uddel points." Hvis du fra et medlem faar et hjaelpsomt indlaeg men som kommentar (ikke markeret med gult, saasom #1 ovenfor) som du gerne vil give points til saa laver du et indlaeg og beder det medlem oprette et svar som du kan acceptere. Du har ogsaa muligheden for selv at oprette et svar (for eksempel blot sige "Jeg lukker") og acceptere det. Under alle omstaendigheder, afslut hvad du har paabegyndt. Please.
Jeg bringer (maaske til overflod) disse citater fra FAQ:
"Hvordan accepterer eller afviser jeg et svar?
Når der er kommet et svar som du kan bruge, så klikker du ud for selve svaret i boksen "Acceptér dette svar". Derefter accepterer du svaret i den boks som dukker frem.
Er løsningen kommet gennem en kommentar, skal du stadig give point. Du skriver bare, at bruger XXX har løst problemet og beder vedkommende om et svar. Når svaret kommer, accepterer du bare dette."
"Hvordan lukker man sit spørgsmål?
Et spørgsmål er lukket når der er lagt et svar, som er blevet accepteret af vedkommende som oprettede spørgsmålet. Hvis du har et spørgsmål hvor ingen af svarene kunne bruges, kan du selv lægge et svar og acceptere dette.
Husk at hvis du selv fandt en løsning, så skriv den endelig som svar da andre kan have glæde af den i fremtiden! Samtidig viser du de brugere, som har brugt tid på dit spørgsmål, at du selv fandt en mere velegnet løsning."
Ville lige sige at jeg staddigvæk har problemmet :( Har forsøgt alle forslåede løsninger ("NZ" løsningen og "on error") men desværre uden held.
Jeg har en mistanke om det er fordi jeg indtaster visual basic scriptet forkert.
Jeg forsøger at indtaste følgende: Private Sub Postnr_BeforeUpdate(Cancel As Integer) on error goto errorhandler =DLookUp("[Kommune_navn]","Kommune","[Postnr] = " & [Postnr]) errorhandler: Resume next End sub
Men får fejl ved Dlookup. Jeg har så læst mig frem til der skal noget til venstre for Dlookup, jeg har forsøgt mig med "Postnr = Dlookup" men uden held
er der nogen der kan forklare mig præcis hvad der skal stå for at scriptet virker?
arnejensen22, traaden haenger. Hvis det i mellemtiden er lige meget saa ryd venligst op og luk spoergsmaalet. Ellers reager.
Du startede traaden med at fortaelle at naar postnummer er tomt saa faar du #fejl. Betyder det at naar postnummeret ikke er tomt saa faar du kommunenavnet at se? Hvor faar du i saa fald kommunenavnet at se? I et felt paa en formular? Hvis for eksempel Postnr sidder paa en formular der hedder KommuneSlaaOp og kommunenavnet skal vises i feltet KommuneNavnHer saa kunne koden vaere: Me.KommuneNavnHer = =DLookUp("[Kommune_navn]","Kommune","[Postnr] = " & [Postnr])
Vis os den kode der fungerer naar postnummer ikke er tomt.
arnejensen22, jeg proever lige en gang mere. Du oprettede dette spoergsmaal paa eksperten for at faa hjaelp (gratis og frivilligt) til et problem. Du fik indlaeg fra adskillige medlemmer, men du fulgte ikke op til en konklusion og du lukkede ikke spoergsmaalet. Som jeg forklarede i #5, du lukker ved at acceptere et svar, et indlaeg markeret med gult. Du accepterer svaret ved at saette et 'flueben' i den lille firkant og derefter klikke paa feltet "Accepter svar og afgiv points." Hvis du ikke mener at have haft hjaelp af indlaeggene saa maa du selv oprette et svar og acceptere det. Men under alle omstaendigheder, afslut hvad du begyndte og faa svaret lukket. Lad os ikke blive haengende i et evigheds-aabent spoergsmaal.
Synes godt om
Ny brugerNybegynder
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.