Avatar billede dl Nybegynder
07. november 2004 - 14:41 Der er 36 kommentarer og
1 løsning

Hvorfor kan jeg ikke overføre en dato

Jeg har Tabel1:

Date: Dato
Varenr: Tal (Primær nøgle)
Varenavn: Tekst


SÅ har jeg en form: navn "indform"
På denne form har jeg et tekst felt, hvor jeg skal skrive en dato (som jeg skal overføre på et andet tidspunkt).

Så har jeg en knap som skal åbne en tabel ved navn "data" , som dataart.

Når jeg så trykker på knappen på "indform" så skal den åbne "data" men den skal så tilføje en nye record, hvor den overføre datoen fra "indform". Samt den viser alle de andre data i tabelen.

Problem: Hvordan for jeg overført den dato.
Det skal skrives som VB kode bagved. Altså ingen MACROER.

Håber i kan hjælpe mig.

//dl
Avatar billede dl Nybegynder
07. november 2004 - 14:42 #1
Jeg kan godt sende mit lille program. Og jeg vil også gerne modtage programmer samt kode stumper.
//dl
Avatar billede thesurfer Nybegynder
07. november 2004 - 14:50 #2
Indsæt hellere din kodestump her på Eksperten.
Avatar billede dl Nybegynder
07. november 2004 - 14:53 #3
jeg har ikke rigtig nogle kode stumper.
men tænkte på noget i denne stil. på indform ved klik

DoCmd.OpenTable "Tabel1", acViewNormal, acAdd
Og så skal jeg overføre datoen, hvordan gør jeg det.
samt så skal den jo også flytte focus hen på det næste indtastningsfelt.

//dl
Avatar billede joern Nybegynder
07. november 2004 - 15:18 #4
Hej.

Jeg har ikke forstand på access-tabeller, men at sætte focus på et tekstfelt udføres meget enkelt:  text1.setfocus

I Visual Basic 5 (skriv f. h...... version i spørgsmål) kan man indstiller at alle proporties vises i en lille hjælpe-liste, når navnet på en kontrol skrives efterfulgt af punktum!

M.v.h. Jørn
Avatar billede dl Nybegynder
07. november 2004 - 15:20 #5
Ja, det ved jeg godt ... men er det, det samme hvis ens form bliver vist som en datatabel?
Avatar billede terry Ekspert
07. november 2004 - 17:44 #6
Docmd.runsql "INSERT INTO Tabel1 ([Date], Varenr, VarenNavn) Values ('2004-11-07', 1234, 'Varenavn goes here')"
Avatar billede dl Nybegynder
07. november 2004 - 18:08 #7
k, men datoen skal hentes fra en anden form. har jeg vist også skrevet.
men tak for svaret endtil nu.
Avatar billede terry Ekspert
07. november 2004 - 18:20 #8
This was just an example of how to insert data into a table using VBA


Docmd.runsql "INSERT INTO Tabel1 ([Date], Varenr, VarenNavn) Values ('" & forms!SomeOtherForm!Dato & "', 1234, 'Varenavn goes here')"
Avatar billede joern Nybegynder
07. november 2004 - 18:31 #9
Hej.

Når indholdet af et felt skal hentes fra én form til en anden er syntaksen:

form2.text1 = form1.text1.text

M.v.h.  Jørn
Avatar billede dl Nybegynder
07. november 2004 - 18:35 #10
øhh ... jeg har lidt problemmer med at få det til at virker.
Men siger fejl i det.
Og jeg har prøvet at slå Microsoft DAO 3,6 Object Liberary

Hvad gør jeg nu
//dl
Avatar billede terry Ekspert
07. november 2004 - 19:27 #11
is this in Access or VB?

if you arent using recordsets then you dont need DAO!

What error are you getting?
Avatar billede dl Nybegynder
07. november 2004 - 19:33 #12
Access sorry ... at jeg ikke skrev dette.
Avatar billede terry Ekspert
07. november 2004 - 19:56 #13
what is the error?
Avatar billede dl Nybegynder
07. november 2004 - 20:18 #14
Run-time error 2450
Can't find the formular "Form_IndForm.

Private Sub Kommandoknap2_Click()
DoCmd.RunSQL "INSERT INTO Tabel1 ([Date], Varenr, VarenNavn) Values ('" & Forms!Form_IndForm!Dato & "', 1234, 'Varenavn goes here')"

The name of the Form is  IndForm

if I do it

DoCmd.RunSQL "INSERT INTO Tabel1 ([Date], Varenr, VarenNavn) Values ('" & Forms!IndForm!Dato & "', 1234, 'Varenavn goes here')"

I get the error: Runtime Error 2465
Avatar billede terry Ekspert
08. november 2004 - 10:36 #15
Is the form Form_IndForm open?

You could also try Forms![Form_IndForm]![Dato]

You need forms! so the first method is correct
Avatar billede dl Nybegynder
08. november 2004 - 10:45 #16
Form_IndForm open ?
I kan se it, in the code window.

And i the program when it runs: I go from the IndForm to a sek. form.
T have tryed to indput you code, but I get a Runtime error 2450: Can't find Form_IndForm.

I am running Access 2000.

//dl
Avatar billede terry Ekspert
08. november 2004 - 19:49 #17
NOTE: The form [Form_IndForm] must be open when you run the code otherwise it can not see the date field.
if you can send me your database then I have a better chance of finding the problem.
eksperten@NOSPAMsanthell.dk
remove NOSPAM and add a reference to this question so I know what I am receiving
Avatar billede dl Nybegynder
09. november 2004 - 10:20 #18
terry>> done, I have send you a mail.
//dl
Avatar billede terry Ekspert
09. november 2004 - 19:06 #19
I have received your dB, will look at it now and get back as soon as possible!
Avatar billede terry Ekspert
09. november 2004 - 19:45 #20
I have altered the code to open the form (data) to


DoCmd.OpenForm "data", acNormal

and the default value for the date field (date) to

=[Forms]![Indform]![Tekst0]
Avatar billede terry Ekspert
09. november 2004 - 19:56 #21
dl> I dont seem to be able to send the db return, I get an error!

But you should be able to alter your database so that it works now. If not then I can try sending it again.
Avatar billede dl Nybegynder
10. november 2004 - 11:00 #22
I still have probloms.

I have maked change. But I can one add one line to datebase, the rest is lost.
And I have probloms, if I delete the one line of data, herefter I can add data also.


When I push the button, I need access to add the date, and open my data form.
Sp I can ins the varenr and varenavn. When I push enter at the varenavn, access have to make room for a new post.

Access most not tell me, that I have add a ny post.

//dl

I will put in a +30 point.
PS. Do you at all time so many probloms with access ?
Avatar billede terry Ekspert
10. november 2004 - 11:13 #23
Try changing the "Default view" property to "Continuous Forms" thsi will show all of the records.

The only code you should have in the indfomr is

Option Compare Database

Private Sub Kommandoknap2_Click()

    DoCmd.OpenForm "data", acNormal

End Sub

Remove anything else!

When you press the button you should see a date in the field. This will be used for all new records you add.

Does this help?
Avatar billede dl Nybegynder
10. november 2004 - 11:47 #24
Nope, I have fix it.
I still have probloms.
I can add date, the time i try, it works... the rest does not.
Avatar billede terry Ekspert
10. november 2004 - 11:56 #25
I am not quite sure what you mean, can you send me your dB again?
Avatar billede terry Ekspert
10. november 2004 - 12:49 #26
Dennis, I am not sure what it is you want!

You can write in danish if you want, I understand 100%!

This code opnes the form "data" when you press the button.

DoCmd.OpenForm "data", acNormal

The default value propery for the date field MUST be lik ethis

=[Forms]![Indform]![Tekst0]

Now when you add a new record in form "data" the date will be taken from the form "indform".

Is this what you want? If not then you must explain!
Avatar billede dl Nybegynder
10. november 2004 - 13:04 #27
k,
Jeg indtaster en dato i Formen "indform" - løst
Når jeg trykker på knappen skal den åbne formen "data" - løst
formen "data" skal åbnes som et dataview - løst

På ALLE nye record som jeg indtaster i "data", skal den auto indsætte den dato jeg har indtastet fra "indform"

vi starte med dette  :P

//dl

Jeg troede ikke du kunne forstå dansk, du svar tilbage i engelsk jo.. men ok. ;)
Avatar billede terry Ekspert
10. november 2004 - 13:09 #28
Jeg kan godt forstå dansk, det er bare ikke så nemt at skrive :o)

Når!

The default value propery for the date field on the data form MUST be like this

=[Forms]![Indform]![Tekst0]
Avatar billede dl Nybegynder
10. november 2004 - 13:57 #29
k, men der er stadig problemmer... den indsætter den rigtig dato første gang.. anden gang, kommer den med en #navn? fejl.
Avatar billede terry Ekspert
10. november 2004 - 14:00 #30
the form (Indform) must always be open, otherwise it cant see the date you entered in the form!
Avatar billede dl Nybegynder
10. november 2004 - 14:34 #31
det er den også.

Kan jeg ikke lave et eksempel på det.
Hvordan det hele skal funke, kan du så ikke oversætte det til access/vb.
Jeg er ved at løbe tør for forklaringer.

Det er ikke det stor program vi taler om.
Avatar billede dl Nybegynder
11. november 2004 - 11:53 #32
Det er sådan det skal virke.
Jeg har faktisk selv prøvet at løse det sådan. men kunne ikke.

List et sp. Hvordan laver man en hovedformulare  osv.  og hvordan virker.

på min indform har jeg en dato box som du ved. Hvad hedder det punkt jeg skal kalde, for at få value for den, fx kontrolkilde eller hva.

Du skriver: =[Forms]![Indform]![Tekst0]  men jeg kan ikke finde  tekst0 på den form, selvom godt ved hvad det er ?

//dl

Hvis du forstår mig.
Avatar billede dl Nybegynder
11. november 2004 - 11:56 #33
se også under http://www.eksperten.dk/spm/560294  for de +30 point
Avatar billede terry Ekspert
11. november 2004 - 18:08 #34
[Forms] mean that you want to look at the forms collect (all the forms)
and from this collection you want top look at the form
[Indform]
Then you want to see the field named [Tekst0]

You can see the in the NAME (Navn) property, and you can also change this to some other name, but it is a good idea to do this before you start using it.

Control Source (kontrolkilde ) is where the data in the field comes form. THis is normally a field in a table.


Note sure what you mean here >> "List et sp. Hvordan laver man en hovedformulare  osv.  og hvordan virker."
Avatar billede terry Ekspert
11. november 2004 - 18:12 #35
here are a few links you may find usefull!
http://www.hedeskov.dk/
http://www.kursusmaterialer.dk/
Avatar billede dl Nybegynder
12. november 2004 - 09:46 #36
tak
//dl
Avatar billede terry Ekspert
12. november 2004 - 19:46 #37
selv tak Dennis, og god weekend
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
Kurser inden for grundlæggende programmering

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.

Du kan også logge ind via nedenstående tjenester