CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede t-johansen Juniormester
16. februar 2011 - 15:00 Der er 17 kommentarer og
2 løsninger

hvordan laver jeg denne if sætning

Jeg har en formular der henter fra en forspørgsel.

Forespørgsel:
kontrakt-ny-forspørgsel

Felter i forespørgsel:
V04_KTO2
D01_NAVN_OCC_1

Formularfelter:
Tekst193


Kunne godt tænke mig en regel på formular feltet Tekst193 ala denne:

if V04_KTO2 = "0" then Tekst193 = "Ingen bruger" Else Tekst193 = D01_NAVN_OCC_1


Altså hvis V04_KTO2 er nul (ikke tomt) skal teksten "ingen bruger" vises i formular tekstfeltet Tekst193, men hvis V04_KTO2 er større end nul så skal formular feltet Tekst193 vise indholdet af forespørgselsfeltet D01_NAVN_OCC_1 vises.


Hvordan skal den helt præcis være og hvor skal man sætte den ind henne, eks. under "before update" eller lign.?
Avatar billede mugs Novice
16. februar 2011 - 15:07 #1
Hvilke datatyper har du i dine felter?
Avatar billede t-johansen Juniormester
16. februar 2011 - 15:12 #2
V04_KTO2 er tal, mellem 0 og 9999999

D01_NAVN_OCC_1 er tekst
Avatar billede jensen363 Forsker
16. februar 2011 - 15:15 #3
Noget i denne stil

IIF([DitReferenceFelt A]=0;Me![DitResultatFelt]="Ingen bruger";Me![DitResultatFelt]=([DitReferenceFelt B])
Avatar billede jensen363 Forsker
16. februar 2011 - 15:16 #4
Ups > sorry mugs ... var lidt længe om at få sendt
Avatar billede t-johansen Juniormester
16. februar 2011 - 15:30 #5
@Jensen er der ikke nogle parantes fejl i den sætning?
Avatar billede jensen363 Forsker
16. februar 2011 - 15:38 #6
Den er ikke testet ... skrev den efter hukommelsen

IIF([DitReferenceFelt A]=0;Me![DitResultatFelt]="Ingen bruger";Me![DitResultatFelt]=[DitReferenceFelt B])
Avatar billede t-johansen Juniormester
16. februar 2011 - 16:11 #7
Har lavet denne:

IIF([kundernr]=0,Me![Tekst193]="ingen bruger",Me![Tekst193]=[Tekst233])


men den siger
compile error
Expected: =



Hvor skal man indsætte denne regel?

i forespørgslen?
i et tekstfelt i en forumlar under eks. "update after" som kodegenerator?
Avatar billede jensen363 Forsker
16. februar 2011 - 16:13 #8
Afhængigt af hvordan de afledte input data er, ville jeg som udgangspunkt indsætte det i forespørgslen
Avatar billede jensen363 Forsker
16. februar 2011 - 16:17 #9
Hvis du kundenummer på din form også, må det være sådan

IIF(Me![kundernr]=0,Me![Tekst193]="ingen bruger",Me![Tekst193]=[Tekst233])
Avatar billede t-johansen Juniormester
17. februar 2011 - 11:52 #10
kan ikke få den til ar reagere på noget som helst.

Jeg vil helst have det på formular niveau.

Har også prøvet med dette:

Private Sub Tekst193_BeforeUpdate(Cancel As Integer)
If Me.kundenr.Text < 1 Then
Me.Tekst233.Visible = False
End Sub

Hele pointen er at hvis kundenr = 0 så viser den teksten "skabelon konto" i Tekst233 og den tekst vil jeg gerne skjule/ændre.

Har brugt Tekst193 som tekstboks til at vise resultat i, i forrige eksempler.
Avatar billede mugs Novice
17. februar 2011 - 11:57 #11
Prøv at indsætte koden i feltet Text BeforeUpdate.
Avatar billede t-johansen Juniormester
17. februar 2011 - 15:15 #12
Fatter hat af hvad der sker.

Nu har jeg prøvet at lave en helt ny og meget simpel formular til at teste det:

http://www.loeveburet.dk/media/db2.mdb

hvis du har tid må du meget gerne kigge på den.
Avatar billede mugs Novice
17. februar 2011 - 15:27 #13
Denne fungerer:

Private Sub Tekst0_BeforeUpdate(Cancel As Integer)
If Me.Tekst0 < 1 Then
Me.Tekst2.Visible = False
End If
End Sub
Avatar billede jensen363 Forsker
17. februar 2011 - 15:38 #14
Private Sub Tekst0_AfterUpdate()

    If Tekst0.Value > 0 Then
        Tekst2.Value = "større end nul"
    Else
        Tekst2.Value = "nul eller mindre"
    End If

End Sub
Avatar billede mugs Novice
17. februar 2011 - 15:47 #15
Du har indtastet en SQL sætning i Tekst2. Slet den og sæt markøren i Tekst0 BeforeUpdate. Tryk på de 3 små ... i højre side og paste koden ind i VBA-editoren.
Avatar billede t-johansen Juniormester
17. februar 2011 - 16:12 #16
Det lykkedes, juhu.


svar og du skal få point....
Avatar billede mugs Novice
17. februar 2011 - 16:17 #17
Hvem?
Avatar billede t-johansen Juniormester
18. februar 2011 - 07:58 #18
Hvis jensen også svarer så får i begge point.
Avatar billede jensen363 Forsker
18. februar 2011 - 08:31 #19
Jamen så svarer jeg også :-)
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
Access kurser
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser
Se alle Access kurser

Flere spørgsmål fra Access kategorien

Titel Indlæg Oprettet Seneste aktivitet
Opslag på datoen i et dato og tid-felt Af Bjørn i Access 3 23/06/202521:02 25/06/202514:35
Fejl: SQL-Sætning , ... ,"SELECT" var ventet Af per2edb i Access 8 17/06/202511:57 19/06/202508:56
Overførsel af datoer fra Access til MS Project Af per2edb i Access 11 19/05/202513:45 20/05/202514:40
Ikke modal form benyttet som MsgBox custom designet Af per2edb i Access 8 14/05/202520:44 16/05/202507:57
Vis en kaldt App Af per2edb i Access 2 14/05/202509:29 14/05/202509:59
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 19:11 Ændre autoudfyld i Outlook og Word Af TTA i Office & Kontorpakker
I dag 12:27 Office Pro 2019 forsvinder Af mort1 i Office & Kontorpakker
I går 16:34 Se filmen : "Vi, som går køkkenvejen" (Hovedperson : Birgitte Reimer Af Ikke-ekspert i Fri debat
02/0719:07 Mellem tidspunkter Af nyhavn18 i Excel
02/0710:02 Oversigt over antal feriedage Af AnjaJesse i Excel
White papers
Flere white papers »


Premium
Teaser billede
Vil fyre tusindvis af ansatte globalt: Nu reagerer Microsofts danske organisation med 800 medarbejdere
Læs mere »
Staten binder sig med ny aftale til Microsoft i usædvanlig lang tid - og det er der en særlig årsag til
Pengene vælter ud af den danske Dynamics-kæmpe Cepheo i selskabets andet leveår - men forretningen buldrer frem
Du skal opdatere hurtigst muligt: Alvorlig sårbarhed opdaget i Citrix-software
Se alle »
Computerworld
Teaser billede
Danmarks største fiberselskab skifter navn: Norlys skal ikke længere hedde Norlys
Læs mere »
Glemte at fjerne adgang for suspenderet it-medarbejder: Næste dag var kunder i Tyskland og Bahrain låst ude
Amerikansk koncern med 700 ansatte i Danmark: Sender besked til kunder 21 måneder efter storstilet angreb
Aktie-kursen ottedoblet på fire år: Er nu verdenshistoriens mest værdifulde selskab
Se alle »
CIO
Teaser billede
Microsoft kæmper med at få Copilot ud over rampen – og det skyldes især én ting
Læs mere »
Her står medarbejderne for at ansætte og fyre - og det har gjort rekruttering af it-professionelle langt lettere
Rigspolitiet gør klar til stort opgør med it-evighedskontrakter: Søger hjælp fra leverandørerne
Mange CISO'er mistrives i jobbet: Nu stiller tidligere cyber security-chef i Energinet og Ørsted et kontroversielt forslag
Se alle »
Job & Karriere
Teaser billede
Fungerede ikke: Dropper AI som erstatning for kundeservice-medarbejdere - har nu brug for nye folk
Læs mere »
It-chef og halv it-afdeling fyret i forsikringsselskab på grund af kommentar om potteplante
Danske it-folk tør ikke længere skifte job hele tiden - og det er der en særlig årsag til
Itm8 fyrer: Opsiger ansatte og reorganiserer
Se alle »
White paper
Teaser billede
Revolutionér kundeoplevelsen med AI og automatisering
Læs mere »
Undgå at printeren bliver svageste led i sikkerheden
Sådan automatiserer du vagtplanlægningen med AI
Udnyt Genesys Cloud CX optimalt og styrk kundeoplevelsen
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »