www.elektronik.si Seznam forumov www.elektronik.si
Forum o elektrotehniki in računalništvu
 
 PomočPomoč  IščiIšči  Seznam članovSeznam članov  SkupineSkupine  StatisticsStatistika  AlbumAlbum  DatotekeFilemanager DokumentacijaDocDB LinksPovezave   Registriraj seRegistriraj se 
  PravilaPravila  LinksBolha  PriponkePriponke  KoledarKoledar  ZapiskiZapiski Tvoj profilTvoj profil Prijava za pregled zasebnih sporočilPrijava za pregled zasebnih sporočil PrijavaPrijava 

MS Access VBA
Pojdi na stran 1, 2  Naslednja
 
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Programska oprema
Poglej prejšnjo temo :: Poglej naslednjo temo  
Avtor Sporočilo
besoft
Član
Član



Pridružen-a: Ned 01 Apr 2012 10:22
Prispevkov: 585
Aktiv.: 3.62
Kraj: Žižki - Prekmurje

PrispevekObjavljeno: Ned Dec 09, 2012 8:33 pm    Naslov sporočila:  MS Access VBA Odgovori s citatom

Celi dan se že nategujem z problemom..

torej, imam dve polji polje1 in polje2. Polje1 neko vrednost X. Ko preko zunanjega dogodka (v tem primeru komunikacije ON_Data() ) hočem drugemu polju2 dodeliti vrednost prvega polja1 se ne zgodi nič. Polje2 ostane prazno. Ob naslednjem proženju se polje1 posodobi na novo vrednost, polje2 p dobi staro vrednost polja1.
prosim za kakšen nasvet, ker bom drugče računalo vrgel skozi okno..

thx
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
mobwap
Član
Član



Pridružen-a: Sre 14 Mar 2012 9:42
Prispevkov: 326
Aktiv.: 2.01
Kraj: Doma

PrispevekObjavljeno: Ned Dec 09, 2012 9:10 pm    Naslov sporočila:   Odgovori s citatom

Iz kristalne korgle ti lahko povem samo to da je napaka v kodi in ne bazi...
Nazaj na vrh
Skrit Poglej uporabnikov profil Pošlji zasebno sporočilo
besoft
Član
Član



Pridružen-a: Ned 01 Apr 2012 10:22
Prispevkov: 585
Aktiv.: 3.62
Kraj: Žižki - Prekmurje

PrispevekObjavljeno: Ned Dec 09, 2012 9:16 pm    Naslov sporočila:   Odgovori s citatom

torej, če gledam na obrazcu je vrednost nova v polju 1 po izvedenem GotoNext, če pa vrednost v VBA prenesem v drugo polje:

Koda:

polje2=polje1


je pa vrednost še stara.
Pa vem, da ni problem v bazi..
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
Igor01
Član
Član



Pridružen-a: Pon 29 Nov 2004 12:09
Prispevkov: 598
Aktiv.: 2.52
Kraj: KK

PrispevekObjavljeno: Ned Dec 09, 2012 9:44 pm    Naslov sporočila:   Odgovori s citatom

Po tem, ko ukažeš spremembo, v naslednjo ukazno vrstico vpiši DoEvents.

LP
Nazaj na vrh
Skrit Poglej uporabnikov profil Pošlji zasebno sporočilo
besoft
Član
Član



Pridružen-a: Ned 01 Apr 2012 10:22
Prispevkov: 585
Aktiv.: 3.62
Kraj: Žižki - Prekmurje

PrispevekObjavljeno: Ned Dec 09, 2012 9:50 pm    Naslov sporočila:   Odgovori s citatom

Bom tudi to poskusil,,,trenutno sem rešil tako:

Koda:

Private Sub Form_Current()
polje2=polje1
End Sub
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
mkezmah
Član
Član



Pridružen-a: Sre 21 Jan 2009 16:30
Prispevkov: 220
Aktiv.: 1.10
Kraj: Maribor

PrispevekObjavljeno: Pon Dec 10, 2012 8:38 am    Naslov sporočila:   Odgovori s citatom

Kaj pa Me.Refresh ?

LP
Marko
Nazaj na vrh
Skrit Poglej uporabnikov profil Pošlji zasebno sporočilo
besoft
Član
Član



Pridružen-a: Ned 01 Apr 2012 10:22
Prispevkov: 585
Aktiv.: 3.62
Kraj: Žižki - Prekmurje

PrispevekObjavljeno: Pon Dec 10, 2012 8:41 am    Naslov sporočila:   Odgovori s citatom

Razen te rešitve, ki sem jo navedel in jo našel na netu, vse ostalo ne deluje..tudi Refresh ne.

Delansko, če delaš z gumbi na formi, je vse ok. Podatki so pravilno prikazani, če pa sprožiš procedure in funkcije z VBA potem, pa se vrednosti ne posodobijo.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
sodrgerg
Član
Član



Pridružen-a: Čet 20 Avg 2009 14:16
Prispevkov: 61
Aktiv.: 0.32
Kraj: Ljubljana

PrispevekObjavljeno: Pon Dec 10, 2012 9:11 am    Naslov sporočila:   Odgovori s citatom

Kj pa .update
_________________
To, kar vemo, je kapljica; to, česar ne vemo, je morje.(Isaac Newton)
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
sodrgerg
Član
Član



Pridružen-a: Čet 20 Avg 2009 14:16
Prispevkov: 61
Aktiv.: 0.32
Kraj: Ljubljana

PrispevekObjavljeno: Pon Dec 10, 2012 9:16 am    Naslov sporočila:   Odgovori s citatom

Začasna rešitev pa je tudi da iz programa kličeš proceduro gumba iz forme, ki praviš da dela. Command1_Click()
_________________
To, kar vemo, je kapljica; to, česar ne vemo, je morje.(Isaac Newton)
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
besoft
Član
Član



Pridružen-a: Ned 01 Apr 2012 10:22
Prispevkov: 585
Aktiv.: 3.62
Kraj: Žižki - Prekmurje

PrispevekObjavljeno: Pon Dec 10, 2012 9:23 am    Naslov sporočila:   Odgovori s citatom

Najbolj zanimivo je to, da če kličem proceduro Gumb_Click() ..tudi ne posodobi vrednosti.
Prav tako tudi .Update ne naredi željenega.

Mogoče je to kakšen bug v Acsessu..nevem.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
sodrgerg
Član
Član



Pridružen-a: Čet 20 Avg 2009 14:16
Prispevkov: 61
Aktiv.: 0.32
Kraj: Ljubljana

PrispevekObjavljeno: Pon Dec 10, 2012 12:20 pm    Naslov sporočila:   Odgovori s citatom

Med klikom na gumb in klicanjem procedure Gumb_Click() ne bi smelo biti prav nikakršne razlike. Prilepi del sporne kode ...
_________________
To, kar vemo, je kapljica; to, česar ne vemo, je morje.(Isaac Newton)
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
sraka
Član
Član



Pridružen-a: Čet 20 Nov 2008 23:52
Prispevkov: 481
Aktiv.: 2.38
Kraj: PMAVs

PrispevekObjavljeno: Pon Dec 10, 2012 1:06 pm    Naslov sporočila:   Odgovori s citatom

Če je tole v aavatarju tvoja slika, bi bilo fino, če bi šel k frizerju in brivcu.
_________________
Danes je težko biti budala, konkurenca je velika, pa še dokazovati se moraš večkrat na dan.
Sem ogledalo: Nisem kriv, če v meni vidite nekaj kar vam ni všeč.
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
sodrgerg
Član
Član



Pridružen-a: Čet 20 Avg 2009 14:16
Prispevkov: 61
Aktiv.: 0.32
Kraj: Ljubljana

PrispevekObjavljeno: Pon Dec 10, 2012 1:12 pm    Naslov sporočila:   Odgovori s citatom

Bom probal nadet čas za stilsko preobrazbo.
_________________
To, kar vemo, je kapljica; to, česar ne vemo, je morje.(Isaac Newton)
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo
besoft
Član
Član



Pridružen-a: Ned 01 Apr 2012 10:22
Prispevkov: 585
Aktiv.: 3.62
Kraj: Žižki - Prekmurje

PrispevekObjavljeno: Pon Dec 10, 2012 2:08 pm    Naslov sporočila:   Odgovori s citatom

To je del kode ki izvede Goto next :
Koda:

   If Data = "tp1" Then
   If Len(txtName) >= 2 Then
   DoCmd.GoToRecord , , acNext
   Ukaz36_Click
   End If
   End If


in del kode, ki ni delovala, kamor koli je bila vstavljena (After update, GetFocus,..) :
Koda:

Me.Besedilo34 = txtName.Value


Če sem gledal podateke na obrazcu, so se spremenili, VBA pa je še vedno pošiljal naprej prejšnji podatek..:
Koda:

Sdata = Besedilo34 & Chr(13) & Chr(10)
Nbytessent = tc1.Write(Nbytestosend, Ntimeout, Sdata)


zdaj rešeno tako in deluje (najdeno na netu, kjer je bila opisana ista težava):
Koda:

Private Sub Form_Current()
Me.Besedilo34 = txtName.Value
End Sub
Nazaj na vrh
Odsoten Poglej uporabnikov profil Pošlji zasebno sporočilo Pošlji E-sporočilo
mkezmah
Član
Član



Pridružen-a: Sre 21 Jan 2009 16:30
Prispevkov: 220
Aktiv.: 1.10
Kraj: Maribor

PrispevekObjavljeno: Pon Dec 10, 2012 7:55 pm    Naslov sporočila:   Odgovori s citatom

Ja, mislim da je tukaj problem:
Me.Besedilo34...

Poskušaj se sklicevati direktno na formo in ne na "me".

Je minilo kar nekaj časa kar sem se igral z accessom, sem pa imel podobne težave. Lahko jutri pogledam svoje stare programe da se spomnim točno kako sem se skliceval (če ne bo seveda prej uspelo tebi samemu).

LP
Marko
Nazaj na vrh
Skrit Poglej uporabnikov profil Pošlji zasebno sporočilo
Pokaži sporočila:   
Objavi novo temo   Odgovori na to temo   Printer-friendly version    www.elektronik.si Seznam forumov -> Programska oprema Časovni pas GMT + 2 uri, srednjeevropski - poletni čas
Pojdi na stran 1, 2  Naslednja
Stran 1 od 2

 
Pojdi na:  
Ne, ne moreš dodajati novih tem v tem forumu
Ne, ne moreš odgovarjati na teme v tem forumu
Ne, ne moreš urejati svojih prispevkov v tem forumu
Ne, ne moreš brisati svojih prispevkov v tem forumu
Ne ne moreš glasovati v anketi v tem forumu
Ne, ne moreš pripeti datotek v tem forumu
Ne, ne moreš povleči datotek v tem forumu

Uptime: 11 dni


Powered by phpBB © 2001, 2005 phpBB Group