22. juli 2004 - 10:36Der er
29 kommentarer og 1 løsning
DatePart("ww", TmpDate, 2, 2)
Hei. Jeg skal konvertere valgtdato til uke. Jeg har koblet en combo box mot KalenderKontroller, hvor jeg velger dato. Jeg har så en tekst box som skal konvertere ValgtDato til rigtig Uge nummer. Jeg tror problemet er i access ikke i VB koden. Jeg må manuelt skrive inn et uge nummer for at den skal oppdatere til det rigtige.. hva gjør jeg feil??
"eks kode som er brugt."
Private Sub ValgtDato_AfterUpdate() Dim TmpDate As Date TmpDate = ValgtDato.Value UkeNr.Value = DatePart("ww", TmpDate, 2, 2) End Sub
Denne side indeholder artikler med forskellige perspektiver på Identity & Access Management i private og offentlige organisationer. Artiklerne behandler aktuelle IAM-emner og leveres af producenter, rådgivere og implementeringspartnere.
UkeNr er bundet til tabellene. ValgtDato og UkeNr er en egen tabell som er koblet mot et Hovedskjema. Dette skjema skal hente dato + ukenr fra Kalenderkontrolleren. og gi data videre til Delskjema.
tror algoritmen er riktig. men er usikker på hendelsen er riktig. ValgtDato_AfterUpdate(),
Jeg bruger din kode, men har fortsatt samme problem. Når jeg bytter dato oppdaterer ikke ukenr seg.. kanskje en sql Trigger?? ved Dato change?!
Jeg bruker access 2000. om dette kan ha nogen betydning. Det fungerer fortsatt ikke. TekstBoxen "UkeNr" viser ingen verdi. når jeg bytter dato i kontrolleren kommer det fortsatt ikke noen verdi inn i UkeNr feltet. Når jeg manuelt skriver en verdi inn så vises denne verdien også i delskjema.
Prøv at sætte et Breakpoint på linien Me!UkeNr = 888
Breakpoint sættes ved at trykke F9, når du står på linien.
Derefter starter du formularen op og taster noget UkeNr og derefter en dato i ValgtDato og trykker ENTER. Access skulle nu gerne stope koden på breakpointet, hvorefter du kan kører musen hen over Me!UkeNr for at se hvilken værdi der står i den.
Hvis det ikke svarer overens med det, som du selv har tastet så er der en fejl i navngivningen.
er det alt som skal stå i funksjonen? Denne returnerer fortsatt ikke noen verdi til TekstBoxen.
når jeg bruker ?DatePart("ww", date, vbMonday, vbFirstFourDays) i immidiate vinduet og bytter "date" med "ValgtDato" eller en tilfeldig dato så returneres riktig ukeNr. men dette bare i Immidiate vinduet, ikke i Access skjemaet.
Du skal starte formen og indtaste noget i UkeNr og derefter i valgtDato. Når du trykker ENTER på den sidste, skal du gerne hoppe over i VBA på den linie, som har Breakpointet. Hvis det ikke sker, så vil jeg anbefale dig at slette feltet ValgtDato og oprette det igen forfra.
det er et "Access Form". Jeg skal velge en Dato, også skal UkeNr automatisk returneres til TextBox "UkeNr" etter dato er valgt, er ikke sikkert det lar seg gjøre.. Takker så mye for hjelpen Thomas, jeg må bare prøve videre..
det er første gangen jeg lager et access program. Og dette er siste gjenstående hinder :)
Der er normalt ingen problemer i at lave det....men det kan være meget små detaljer som gør, at det ikke virker. Og det er næsten umuligt for mig at gætte hvad der kan være galt.
De forskellige ting, som jeg bad dig afprøve var blot for at prøve at lokalisere fejlen....
Du er velkommen til at sende databasen til mig, så kan jeg kigge på den (husk at angive hvilken form det er)
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.
