[ Air Live @ 12.05.2009. 10:42 ] @
iamam ovaj cod
Code:
 Dim SQL As String
     
    'SQL = "UPDATE tblStavke " & _
     '     "SET tblStavke.Putanja = 'me.Prikaz.picture' " & _
      '   "WHERE tblStavke.Putanja = 'me.Prikaz.picture'"

    'DoCmd.RunSQL SQL


Želim da u zadnjoj koloni tebele tblStavke dopuniti putanju slike sa forme frmSpajanja.Znači neželim dodati novi record već samo u postojecoj koloni a ona je uvijek zadnja dodati putanju slike sa forme.Moželi bez ovog WHERE da mi netraži da upoređujem po ID-u.Fora je samo ova gore sto sam već napisao.
[ Air Live @ 12.05.2009. 11:41 ] @
Treba mi tipo ovoga nesto ali ni ovo nece da radi
Code:
  DoCmd.RunSQL "UPDATE tblStavke(Putanja)" & _
"SELECT '" & Me.Prikaz.Picture & "'"
[ Air Live @ 12.05.2009. 12:26 ] @
Probao sam ovako i radi ali traži da se upiše putanja i redni broj a ne znam zastokada redni broj vuce sa forme i putanju slike
Code:
DoCmd.RunSQL "UPDATE tblStavke SET [Putanja]= me.Prikaz.Picture WHERE [RB]=me.rb;"
[ Air Live @ 12.05.2009. 13:35 ] @
Neće ni ovo
Code:
DoCmd.RunSQL = "UPDATE tblStavke SET Putanja = '" & Me.Prikaz.Picture & "' WHERE tblStavke.RB = '" & Me.Rb & "'"


Stavrno ne znam u čemu je problem.Znači u tablu tblstavke putanju upisuje prema slici sa forme i prema rednomo broju sa forme.

tblStavke.Putanja
TblStavke.RB

Forma

Prikaz.Picture
RB
[ Zidar @ 12.05.2009. 13:59 ] @
Isprintaj strSQL, pa pokusaj da ga izvrsis u SQL prozoru. Tano ce ti Access reci sta ne valja, pa podesi strSQL tako da proradi. tesko je iz glave konstruisati strSQL a da se ne pogresi.
Code:

DIM strSQL as string

strSQL = "UPDATE tblStavke SET Putanja = '" & Me.Prikaz.Picture & "' WHERE tblStavke.RB = '" & Me.Rb & "'"

debug.print strsql



[ Air Live @ 12.05.2009. 14:08 ] @
Citat:
Isprintaj strSQL, pa pokusaj da ga izvrsis u SQL prozoru.


Ovo nisam baš najbolje shvatio. Dali si mozda misli na Immediate
[ Air Live @ 12.05.2009. 14:20 ] @
Ukljucio sam onaj prozor i izvrsio komandu na click i dobio ovo

Code:
UPDATE tblStavke SET Putanja = 'C:\Program Files\AirLive\Optimizacija\CAD\1.jpg' WHERE tblStavke.RB = '3'


To bih bilo to otprilike ali ipak neizvrši update

Zidar pomagaj



[Ovu poruku je menjao Air Live dana 13.05.2009. u 09:12 GMT+1]
[ Trtko @ 13.05.2009. 07:48 ] @
tblstavke.rb ti je string ili number

ako je number onda makni one apostrofe


[ Air Live @ 13.05.2009. 08:11 ] @
Riješio sam na ovaj način

Code:
DoCmd.RunSQL "UPDATE tblStavke SET tblStavke.Putanja = Forms![frmSpajanje]![Prikaz].Picture WHERE tblStavke.RB = Forms![frmSpajanje]![RB]"


U svakom slučaju hvala na zalaganju