iya Bang Aksan....
saya coba pake  .........' " & lddate & " ' ........... 
baru bener hasilnya...
terimakasih bantuannya, insya Allah bermanfaat....
nyuwun sewu/punten/ngilu mahaf.....pemula neh :D

========
nitra hafas



________________________________
From: Aksan Kurdin <[email protected]>
To: [email protected]
Sent: Thursday, April 15, 2010 11:52:46
Subject: Re: [belajar-access] format date

  
Jika script sql akan dijalankan melalui vba seperti itu, maka harus
diformat english seperti:


DoCmd.RunSQL "update client set verify_date= #" & format(lddate, "mm/dd/yyyy" ) 
& "#, " _
    & "verify_by=' " & pcUserNameLogin & "' where client_id=" & Me.Client_Id. 
Value
Jika mau ikuti sintak anda:



dim lddate as string ' <- kudu string, jangan date !!!!
lddate = Format(Date, "mm/dd/yyyy" )
DoCmd.RunSQL "update client set verify_date= # " & lddate & "#, verify_by='" & 
pcUserNameLogin & "' where client_id=" & Me.Client_Id. Value

aksan kurdin

On 4/14/2010 9:22 PM, 4N17R4 UP4ND4 H4F45 wrote: 
  > 
>para pendekar access...
>
>
>sintaks 1 :
>            lddate = Format(Date, "dd-mmm-yyyy" )
>            DoCmd.RunSQL "update client set verify_date= "
>& lddate & ", verify_by='" & pcUserNameLogin & "' where
>client_id=" & Me.Client_Id. Value
>
>
>sintaks 2 ;
>            lddate = date
>            DoCmd.RunSQL "update client set verify_date= "
>& lddate & ", verify_by='" & pcUserNameLogin & "' where
>client_id=" & Me.Client_Id. Value
>
>
>
>
>kenapa dua2nya untuk variable lddate menghasilkan : 12:00:12 AM
>  
>
>
>bagaimana supaya  tampil  : 4/14/2010
>kenapa bisa beda dengan dari textbox diform ya?
>
>
>>Send instant messages to your online friends http://uk.messenger .yahoo.com
> 

 

Send instant messages to your online friends http://uk.messenger.yahoo.com 

Kirim email ke