[ obradorriuss @ 03.09.2004. 12:35 ] @
Molim Vas za sto brzu pomoc. Radi se o sledecem: Napravio sam aplikaciju i isprobao je na 2 kompa, savrseno radi, ali na kompjuteru na kome treba da radi nesto nece. naime Na jednoj formi imam dugme "Kopiraj" koje sam napravio pomocu wizzarda a ide ovako:

Private Sub Command44_Click()
On Error GoTo Err_Command44_Click

MsgBox "Morate izmeniti inventarni broj kako bi zapis bio sacuvan u bazu podataka!"
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 2, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 5, , acMenuVer70 'Paste Append
Me.[Kolicina] = 1
Me.[Invbroj].SetFocus
Exit_Command44_Click:
Exit Sub

Err_Command44_Click:
Resume Exit_Command44_Click

End Sub



E sada na tom kompu kada napravim MDE fajl i distrinuiram im ga klikom na ovo dugme MS-Access jednom uradi Copy & Paste recorda a jednom prijavi "Paste Append is not possible at this time" (tako nekako) a kod mene na kompu radi. Baza je radjena u MS Access 2003. Samo prvi put uspe da duplira record a posle nece cak i ako resetujem komp i bazu opet nece da radi. Da li neko moze da napise funkciju preko recordseta koja omogucava copy and paste recorda ili neku noviju funkciju od ove gore sto sam je napisao. Ovo je hitno tako da bih molio za sto brzi odgovor. Hvala Vam svima unapred
[ kloktor @ 03.09.2004. 13:19 ] @
http://www.elitesecurity.org/tema/52849

Citat:

pozivanje menu komandi na nacin

Code:
DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
je zastareo i nepouzdan. Bolje je koristiti na primer
Code:
Docmd.RunCommand accmdSaveRecord

Pogledaj u helpu RunCommand.



DoCmd.RunCommand acCmdDelete
DoCmd.RunCommand acCmdCopy
DoCmd.RunCommand acCmdPasteAppend
...
[ obradorriuss @ 03.09.2004. 14:35 ] @
Pre svega hvala ti na odgovoru, ali imam jos jedno pitanje. Naime kako ta 3 reda sto su zastarela da zamenim sa runcommand. Probao sam ali mi uvek prijavi neku gresku, tipa runcommandCopy ili Paste nesto ne valja, a u helpu nisam nasao. Molim te jos jednom ako mozes da mi napises tih par reda cod-a sto ce zameniti ove nepouzdane funkcije. HVALA unapred!
[ obradorriuss @ 03.09.2004. 15:05 ] @
DoCmd.RunCommand acCmdSelectRecord
DoCmd.RunCommand acCmdCopy
DoCmd.RunCommand acCmdPasteAppend

Uspeo sam da resim pomocu ovih komandi ali nadam se da ce raditi na njihovom kompu!