Tata tertib dan peraturan
Mailing List: belajar-access@yahoogroups.com
1. Mailing list ini membahas mengenai pemrograman Microsoft Access.
2. Tidak diperkenankan mem-posting topik yang tidak ada kaitannya sama sekali dengan pemrograman MS Access, peluang kerja atau tawaran kerja sama dengan keahlian di bidang MS Access, atau pengajaran/kursus MS Acces. Pelanggaran terhadap aturan ini akan di-ban dari keanggotaan milis ini.
3. Mohon berdiskusi dengan baik, dengan semangat membangun, demi kemajuan kita bersama. Hindarilah perbantahan (flame) yang bisa menjadi pertengkaran yang tidak perlu.
4 Hindari reply permintaan one-liner seperti 'saya minta juga dong', 'saya setuju', dan lain-lain yang tidak perlu.
5. Sedapat mungkin memberikan data-data yang lengkap dalam mengajukan suatu masalah untuk memudahkan rekan-rekan sesama member mengidentifikasi dan mencarikan solusi, termasuk memberikan subject yang sesuai dengan isi email, tidak dengan kata-kata seperti "tologing dong", "pusing...", "ada yang bisa bantu..", dll.
Moderator
Rabu, 01 Juni 2011
[belajar-access] File - Tata Tertib dan Aturan.txt
[MS_AccessPros] Re: Open form using combo box and command button
John,
Thanks!!!!!!! That worked great!! However, I have an error popping up that says that the newrecords isn't working properly..... i didn't do anything with it not sure why its not working....this is on the find contract form. I've uploaded an updated database...
Thanks!!
Kat
--- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@...> wrote:
>
> Kat-
>
> Your previous message came in at midnight Paris time - sorry, I was sound
> asleep.
>
> First, there should be NO Record Source for the FIND CONTRACT form. You'll be
> changing the data in the first record in the contracts table every time to pick
> search criteria if you do that!!
>
> Also remove the Control Source from the three combo boxes.
>
> The Where Condition for the Vendor macro:
>
> ="[VENDOR=" & [VENDOR ID]
>
> ..
>
> Should be:
>
> ="[VENDOR ID] = " & [VENDOR NAME]
>
> (Or you could do & [VENDOR ID] if you change the name of the combo box.)
>
>
> You fixed the Row Source for Employee, but you didn't fix the macro. The Where
> Condition should be:
>
> ="[EMPLOYEE ID] = " & [EMPLOYEE NAME]
>
> (Or, if you change the combo box name, use [EMPLOYEE ID] for the second part.)
>
>
> John Viescas, author
> Microsoft Office Access 2010 Inside Out
> Microsoft Office Access 2007 Inside Out
> Building Microsoft Access Applications
> Microsoft Office Access 2003 Inside Out
> SQL Queries for Mere Mortals
> http://www.viescas.com/
> (Paris, France)
>
>
>
>
> -----Original Message-----
> From: MS_Access_Professionals@yahoogroups.com
> [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of ka0t1c_ang3l
> Sent: Wednesday, June 01, 2011 6:02 AM
> To: MS_Access_Professionals@yahoogroups.com
> Subject: [MS_AccessPros] Re: Open form using combo box and command button
>
> John -
>
> Did you get a chance to look at the database? Still can't figure out what I'm
> doing wrong... Please help! I've got a deadline and am in a bind.
>
> Thanks!
>
> Kat
>
> --- In MS_Access_Professionals@yahoogroups.com, ka0t1c_ang3l <no_reply@>
> wrote:
> >
> > John -
> >
> > I changed the combo boxes on the search form to the match the ones on my
> contract form, and I took off the quotes; however, it's still not pulling up the
> information. I've uploaded an updated database showing what I did. Also, now
> everytime I make a selection and hit the command button to pull of the
> information it creates a new record in my contract table, not sure why it's
> doing that now.
> >
> > Thanks!
> >
> > Kat
> >
> > --- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@> wrote:
> > >
> > > Kat-
> > >
> > > Well, you have a Vendor ID on the Contract Form, so you need to change your
> > > filter rather than add the Vendor Information table. The combo box on your
> > > search form should be exactly the same as the Vendor combo box on the
> Contract
> > > Form. That will bind the search combo to the ID, not the vendor name, and
> you
> > > can search using that. Don't put quotes around the parameter value because
> > > you'll be searching on a number, not a text value. You need to do a similar
> > > thing to your Employee search - search for the matching ID, not the name.
> Your
> > > search on "Category" (Type of Lease) should work because you're using the
> text,
> > > not an artificial ID.
> > >
> > > John Viescas, author
> > > Microsoft Office Access 2010 Inside Out
> > > Microsoft Office Access 2007 Inside Out
> > > Building Microsoft Access Applications
> > > Microsoft Office Access 2003 Inside Out
> > > SQL Queries for Mere Mortals
> > > http://www.viescas.com/
> > > (Paris, France)
> > >
> > >
> > >
> > > -----Original Message-----
> > > From: MS_Access_Professionals@yahoogroups.com
> > > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of ka0t1c_ang3l
> > > Sent: Tuesday, May 31, 2011 8:13 PM
> > > To: MS_Access_Professionals@yahoogroups.com
> > > Subject: [MS_AccessPros] Re: Open form using combo box and command button
> > >
> > > John,
> > >
> > > I uploaded a new database that shows the arguments in the Find Contract
> Form.
> > > I'm not sure how to add the vendor name into the record source of the
> contract
> > > form. At this point I feel if I add anything I'll mess up my database.....
> > >
> > > Thanks!
> > >
> > > Kat
> > >
> > > --- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@>
> wrote:
> > > >
> > > > Kat-
> > > >
> > > > I found no argument in the macro to open the contract form. What is in
> the
> > > > Where Condition? Note that Vendor Name isn't in the Record Source of the
> > > > contract form, so perhaps that's why you're getting prompted.
> > > >
> > > > John Viescas, author
> > > > Microsoft Office Access 2010 Inside Out
> > > > Microsoft Office Access 2007 Inside Out
> > > > Building Microsoft Access Applications
> > > > Microsoft Office Access 2003 Inside Out
> > > > SQL Queries for Mere Mortals
> > > > http://www.viescas.com/
> > > > (Paris, France)
> > > >
> > > >
> > > >
> > > > -----Original Message-----
> > > > From: MS_Access_Professionals@yahoogroups.com
> > > > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of ka0t1c_ang3l
> > > > Sent: Tuesday, May 31, 2011 6:23 PM
> > > > To: MS_Access_Professionals@yahoogroups.com
> > > > Subject: Re: [MS_AccessPros] Open form using combo box and command button
> > > >
> > > > John,
> > > >
> > > > I do have an argument in the Where Condition; however, when I make a
> selection
> > > > and click on the command button it pops up another small window asking me
> to
> > > > type either the vendor name or employee name, depending on which command
> > > button
> > > > I'm using, instead of immediately taking me to the contract form and
> pulling
> > > up
> > > > the information i've requested. I'm not sure what's wrong with my
> argument.
> > > >
> > > > Thanks!
> > > >
> > > > Kat
> > > >
> > > > --- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@>
> wrote:
> > > > >
> > > > > Kat-
> > > > >
> > > > > You need to add an argument in the Where Condition of the OpenForm
> action in
> > > > > your macro. Depending on what you're filtering, it needs to look
> something
> > > > like
> > > > > the filter in the Embedded Macro in the Find Vendor form.
> > > > >
> > > > > John Viescas, author
> > > > > Microsoft Office Access 2010 Inside Out
> > > > > Microsoft Office Access 2007 Inside Out
> > > > > Building Microsoft Access Applications
> > > > > Microsoft Office Access 2003 Inside Out
> > > > > SQL Queries for Mere Mortals
> > > > > http://www.viescas.com/
> > > > > (Paris, France)
> > > > >
> > > > >
> > > > >
> > > > > -----Original Message-----
> > > > > From: MS_Access_Professionals@yahoogroups.com
> > > > > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of
> ka0t1c_ang3l
> > > > > Sent: Tuesday, May 31, 2011 5:39 PM
> > > > > To: MS_Access_Professionals@yahoogroups.com
> > > > > Subject: Re: [MS_AccessPros] Open form using combo box and command
> button
> > > > >
> > > > > John,
> > > > >
> > > > > Yes, I saw that, but what it should do is when you make a selection and
> > > click
> > > > on
> > > > > the control button it should open up that record in the contract form,
> but
> > > > it's
> > > > > not working. I'm not sure what I'm doing wrong, and the reason for the
> > > error
> > > > on
> > > > > the dates is because I didn't put in a contract end date. How do I get
> the
> > > > > control button to work so that when I make a selection it opens up that
> > > > record?
> > > > >
> > > > > Thanks!
> > > > >
> > > > > Kat
> > > > >
> > > > > --- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@>
> > > wrote:
> > > > > >
> > > > > > Kat-
> > > > > >
> > > > > > The Find Contract form doesn't apply *any* filter in either the Find
> > > > Contract
> > > > > or
> > > > > > Employee Find macros. If I try to use one of your search buttons, I
> get
> > > an
> > > > > > error in the Current event of Contract Form trying to subtract today's
> > > date
> > > > > from
> > > > > > a contract that has no date.
> > > > > >
> > > > > > John Viescas, author
> > > > > > Microsoft Office Access 2010 Inside Out
> > > > > > Microsoft Office Access 2007 Inside Out
> > > > > > Building Microsoft Access Applications
> > > > > > Microsoft Office Access 2003 Inside Out
> > > > > > SQL Queries for Mere Mortals
> > > > > > http://www.viescas.com/
> > > > > > (Paris, France)
> > > > > >
> > > > > >
> > > > > >
> > > > > > -----Original Message-----
> > > > > > From: MS_Access_Professionals@yahoogroups.com
> > > > > > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of
> ka0t1c_ang3l
> > > > > > Sent: Tuesday, May 31, 2011 4:17 PM
> > > > > > To: MS_Access_Professionals@yahoogroups.com
> > > > > > Subject: Re: [MS_AccessPros] Open form using combo box and command
> button
> > > > > >
> > > > > > John -
> > > > > >
> > > > > > It's the Find Contract Form I'm having problems with. Each time I
> select
> > > a
> > > > > > contract or employee name to find a contract it prompts me for either
> the
> > > > > vendor
> > > > > > name. I have uploaded the database I'm currently using that has a few
> of
> > > my
> > > > > > contracts already put in.
> > > > > >
> > > > > > Thanks!
> > > > > >
> > > > > > Kat
> > > > > >
> > > > > > --- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@>
> > > > wrote:
> > > > > > >
> > > > > > > Kat-
> > > > > > >
> > > > > > > I get no prompt at all when I use your Find Vendor form - after I
> > > entered
> > > > at
> > > > > > > least one row in Vendor Information.
> > > > > > >
> > > > > > > John Viescas, author
> > > > > > > Microsoft Office Access 2010 Inside Out
> > > > > > > Microsoft Office Access 2007 Inside Out
> > > > > > > Building Microsoft Access Applications
> > > > > > > Microsoft Office Access 2003 Inside Out
> > > > > > > SQL Queries for Mere Mortals
> > > > > > > http://www.viescas.com/
> > > > > > > (Paris, France)
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > -----Original Message-----
> > > > > > > From: MS_Access_Professionals@yahoogroups.com
> > > > > > > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of
> > > ka0t1c_ang3l
> > > > > > > Sent: Tuesday, May 31, 2011 3:38 PM
> > > > > > > To: MS_Access_Professionals@yahoogroups.com
> > > > > > > Subject: Re: [MS_AccessPros] Open form using combo box and command
> > > button
> > > > > > >
> > > > > > > Good Morning John,
> > > > > > >
> > > > > > > This is the SQL of the Record Source.....
> > > > > > >
> > > > > > > SELECT [VENDOR INFORMATION].[VENDOR NAME]
> > > > > > > FROM [VENDOR INFORMATION]
> > > > > > > ORDER BY [VENDOR INFORMATION].[VENDOR NAME];
> > > > > > >
> > > > > > > I have also uploaded a zipped file of my database under Kats Files
> if
> > > you
> > > > > want
> > > > > > > to look at it.
> > > > > > >
> > > > > > > Thanks!
> > > > > > >
> > > > > > > Kat
> > > > > > >
> > > > > > > --- In MS_Access_Professionals@yahoogroups.com, "John Viescas"
> <john@>
> > > > > wrote:
> > > > > > > >
> > > > > > > > Kat-
> > > > > > > >
> > > > > > > > What is the SQL of the Record Source of the form you're trying to
> > > open?
> > > > > > > >
> > > > > > > > John Viescas, author
> > > > > > > > Microsoft Office Access 2010 Inside Out
> > > > > > > > Microsoft Office Access 2007 Inside Out
> > > > > > > > Building Microsoft Access Applications
> > > > > > > > Microsoft Office Access 2003 Inside Out
> > > > > > > > SQL Queries for Mere Mortals
> > > > > > > > http://www.viescas.com/
> > > > > > > > (Paris, France)
> > > > > > > >
> > > > > > > >
> > > > > > > > -----Original Message-----
> > > > > > > > From: MS_Access_Professionals@yahoogroups.com
> > > > > > > > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of
> > > > ka0t1c_ang3l
> > > > > > > > Sent: Friday, May 27, 2011 10:37 PM
> > > > > > > > To: MS_Access_Professionals@yahoogroups.com
> > > > > > > > Subject: [MS_AccessPros] Open form using combo box and command
> button
> > > > > > > >
> > > > > > > > Hello all!
> > > > > > > >
> > > > > > > > I have a search form with several combo boxes and command buttons.
> > > When
> > > > I
> > > > > > > click
> > > > > > > > on the combo box and select a name I want to then click on the
> command
> > > > > > button
> > > > > > > > which will open up my form based on the selection made in my combo
> > > box.
> > > > > > > > Currently, what is happening after I select a name in the combo
> box
> > > and
> > > > > hit
> > > > > > > the
> > > > > > > > button is another box pops up asking me to enter the vendor name
> > > again.
> > > > > How
> > > > > > > do
> > > > > > > > I get rid of that and have the command button take me directly to
> that
> > > > > form
> > > > > > to
> > > > > > > > bring up the information selected for the vendor? Any help is
> > > > appreciated
> > > > > > it!
> > > > > > > >
> > > > > > > > Thanks!
> > > > > > > >
> > > > > > > > Kat
> > > > > > > >
> > > > > > > >
> > > > > > > >
> > > > > > > > ------------------------------------
> > > > > > > >
> > > > > > > > Yahoo! Groups Links
> > > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > >
> > > > > > > ------------------------------------
> > > > > > >
> > > > > > > Yahoo! Groups Links
> > > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > >
> > > > > > ------------------------------------
> > > > > >
> > > > > > Yahoo! Groups Links
> > > > > >
> > > > >
> > > > >
> > > > >
> > > > >
> > > > > ------------------------------------
> > > > >
> > > > > Yahoo! Groups Links
> > > > >
> > > >
> > > >
> > > >
> > > >
> > > > ------------------------------------
> > > >
> > > > Yahoo! Groups Links
> > > >
> > >
> > >
> > >
> > >
> > > ------------------------------------
> > >
> > > Yahoo! Groups Links
> > >
> >
>
>
>
>
> ------------------------------------
>
> Yahoo! Groups Links
>
[MS_AccessPros] Re: Obtaining Data from a remote server
John;
I get the same stuff without the tab delimited formatting. If the data were attached it would be the whole library? I need to know how to ask it a question to get a single publication record.
Take a look (http://z3950.loc.gov:7090/voyager) maybe try to import it into a blank DB to see what it does. I looked all over the web and all I can find pertaining to Access & xml is importing and exporting one to the other but nothing to query the xml page for specific data.
I'm in way over my head on this one.
Walter
--- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@...> wrote:
>
> Walter-
>
> I get it. What you got from that file is only a schema - no data. If you open
> the XML file in Notepad, do you see any data?
>
> John Viescas, author
> Microsoft Office Access 2010 Inside Out
> Microsoft Office Access 2007 Inside Out
> Building Microsoft Access Applications
> Microsoft Office Access 2003 Inside Out
> SQL Queries for Mere Mortals
> http://www.viescas.com/
> (Paris, France)
>
>
>
> -----Original Message-----
> From: MS_Access_Professionals@yahoogroups.com
> [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of nkpberk
> Sent: Wednesday, June 01, 2011 12:51 AM
> To: MS_Access_Professionals@yahoogroups.com
> Subject: [MS_AccessPros] Re: Obtaining Data from a remote server
>
> John;
> What I posted is exactly what I got, No multiple columns.
> Walter
>
> --- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@> wrote:
> >
> > Walter-
> >
> > Ah, I see you said 12 *records* not 12 columns. Are there multiple sets of
> 12?
> > Can you post a sample of the data?
> >
> >
> > John Viescas, author
> > Microsoft Office Access 2010 Inside Out
> > Microsoft Office Access 2007 Inside Out
> > Building Microsoft Access Applications
> > Microsoft Office Access 2003 Inside Out
> > SQL Queries for Mere Mortals
> > http://www.viescas.com/
> > (Paris, France)
> >
> >
> >
> > -----Original Message-----
> > From: MS_Access_Professionals@yahoogroups.com
> > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of nkpberk
> > Sent: Tuesday, May 31, 2011 7:52 PM
> > To: MS_Access_Professionals@yahoogroups.com
> > Subject: [MS_AccessPros] Re: Obtaining Data from a remote server
> >
> > John : Yes it is, but how do I ask for data based on ISBN or LCCN so I get
> > actual info instead of the place holders?
> > Walter
> >
> >
> >
> > --- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@> wrote:
> > >
> > > Walter-
> > >
> > > Isn't the info you need in the Map table?
> > >
> > > John Viescas, author
> > > Microsoft Office Access 2010 Inside Out
> > > Microsoft Office Access 2007 Inside Out
> > > Building Microsoft Access Applications
> > > Microsoft Office Access 2003 Inside Out
> > > SQL Queries for Mere Mortals
> > > http://www.viescas.com/
> > > (Paris, France)
> > >
> > >
> > >
> > > -----Original Message-----
> > > From: MS_Access_Professionals@yahoogroups.com
> > > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of nkpberk
> > > Sent: Tuesday, May 31, 2011 6:26 PM
> > > To: MS_Access_Professionals@yahoogroups.com
> > > Subject: [MS_AccessPros] Re: Obtaining Data from a remote server
> > >
> > > John;
> > > I downloaded the xml and came up with 9 tables
> > >
> > > Configinfo; "Default" = 0
> > >
> > > DBInfo; "title"= LoC Gateway, "Description" = null
> > >
> > > Explain; "schemaInfo" = null
> > >
> > > ExplainResponse; "Version" = 1.1
> > >
> > > Index; (11 records under "Title") title, subject, creator, editor,
> publisher,
> > > description, date, name, ISBN, ISSN, LCCN
> > >
> > > IndexInfo; "Set" = null
> > >
> > > Map;(12 records under "Name") title, subject, creator, author, editor,
> > > publisher, description, date, name, ISBN, ISSN, LCCN
> > >
> > > Record; "RecordSchema" =http://explain.z3950.org/dtd/2.0/ , "RecordPacking"
> =
> > > xml
> > >
> > > ServerInfo; "Host" = localhost ,"Port" = 7090, "database" = Voyager
> > >
> > > Quoted words are field names
> > >
> > > I am hoping to make this work by inputing The ISBN or LCCN (for older
> > > publications without the ISBN.
> > >
> > > Any Idea how to make this work?
> > >
> > > Walter
> > >
> > >
> > > --- In MS_Access_Professionals@yahoogroups.com, "John Viescas" <john@>
> wrote:
> > > >
> > > > Walter-
> > > >
> > > > In the latest versions of Access, you can Import an XML document into an
> > > Access
> > > > table. If you're able to download the XML document, try importing it to
> see
> > > if
> > > > Access likes it.
> > > >
> > > > John Viescas, author
> > > > Microsoft Office Access 2010 Inside Out
> > > > Microsoft Office Access 2007 Inside Out
> > > > Building Microsoft Access Applications
> > > > Microsoft Office Access 2003 Inside Out
> > > > SQL Queries for Mere Mortals
> > > > http://www.viescas.com/
> > > > (Paris, France)
> > > >
> > > >
> > > > -----Original Message-----
> > > > From: MS_Access_Professionals@yahoogroups.com
> > > > [mailto:MS_Access_Professionals@yahoogroups.com] On Behalf Of nkpberk
> > > > Sent: Monday, May 30, 2011 11:44 PM
> > > > To: MS_Access_Professionals@yahoogroups.com
> > > > Subject: [MS_AccessPros] Obtaining Data from a remote server
> > > >
> > > > Hello Group;
> > > > I'm back with something a bit more complicated than usual. In my attempt
> to
> > > > build the(inventory) part of my application I want to be able to enter the
> > > ISBN
> > > > or LCCN from the Library of Congress to pull pertinent data for the
> > > publications
> > > > inventory table. I have the server link (z3950.loc.gov:7090/voyager) this
> > > gives
> > > > me an xml document but I have no idea how to query it or extract any
> result.
> > > > Any suggestions?
> > > > Walter Griffin
> > > >
> > > >
> > > >
> > > > ------------------------------------
> > > >
> > > > Yahoo! Groups Links
> > > >
> > >
> > >
> > >
> > >
> > > ------------------------------------
> > >
> > > Yahoo! Groups Links
> > >
> >
> >
> >
> >
> > ------------------------------------
> >
> > Yahoo! Groups Links
> >
>
>
>
>
> ------------------------------------
>
> Yahoo! Groups Links
>
[MS_AccessPros] Search for a Record
Hello:
I have a form that is based on a query where I am searching for a record in my database. I put the button to execute on the switchboard. When you click the button it now says "There isn't enough memory to perform this operation. Close unneeded programs and try the operation again."
There are minimal programs open. What is the cause of this and how can I fix?
Thanks,
Celeste
Re: Bls: [belajar-access] Cancel Update Table
Terimakasih banyak pak atas bantuannya,,, tolong pak bntuannya untuk pembuatan form seperti yg sy gambarkan di dalam attachment |
From: sudarsono <jkssbma@yahoo.com>;
To: <belajar-access@yahoogroups.com>;
Subject: Re: Bls: [belajar-access] Cancel Update Table
Sent: Wed, Jun 1, 2011 9:53:45 AM
| Private Sub Form_Current() ' ganti : ' oldQty = Me.Quantity_Barang 'dengan : oldQty = Nz(Me.Quantity_Barang.OldValue, 0) '' aplikasinya sudah cukup lengkap juga ya .... ( good !!! , niru gayanya ...?? lupa , yang jadi moderator Indonesia mencari Bakat) '=========== |
Re: Bls: [belajar-access] Cancel Update Table
pada form [frm_Transaksi Penjualan] :
Text29 --> Disc
Text27 --> ppn
di tab [data] property [default value] beri nilai 0 ( nol ), agar pada saat buka form [frm_Transaksi Penjualan] , total bayar muncul angka yang benar .
'=========
--- In belajar-access@yahoogroups.com, "sudarsono" <jkssbma@...> wrote:
>
>
> Private Sub Form_Current()
> If Me.NewRecord Then
> oldQty = 0
> Else
>
> ' ganti :
>
> ' oldQty = Me.Quantity_Barang
>
> 'dengan :
>
> oldQty = Nz(Me.Quantity_Barang.OldValue, 0)
>
> End If
> End Sub
>
> '' aplikasinya sudah cukup lengkap juga ya .... ( good !!! , niru
> gayanya ...?? lupa , yang jadi moderator Indonesia mencari Bakat)
>
> '===========
> --- In belajar-access@yahoogroups.com, Fajrie Shine fajrie_shine@
> wrote:
> >
> > Dear Mr. Sofyan
> >
> > Ini file *.accdb nya pak,,,,
> > saat terjadi transaksi, jika transaksi di batalkan, nantinya akan ada
> pesan
> > yang muncul, pesan untuk update tbl_ Barang, Jika milih No nantinya
> malah
> > muncul debug
> > Mohon Bantuan untuk perbaikannya pak,,,,
> > Sekalian minta bantuannya untuk pembuatan form
> > hehehehe
> > sy gak bisa buat form seperti yang di inginkan
> > gambarannya saya sertakan bersama di dalam Attachment
> > Mohon Bantuannya pak untuk pembuatan formnya
> >
> > Terimakasih
> >
> >
> >
> >
> >
> > ________________________________
> > Dari: Sofyan Efendi sofyanefendi@
> > Kepada: belajar-access@yahoogroups.com
> > Terkirim: Rab, 1 Juni, 2011 11:45:51
> > Judul: Re: [belajar-access] Cancel Update Table
> >
> >
> > 
> > Dear Mas Fajrie, pada:
> >
> > & oldQty &
> >
> > Apakah oldQty itu nama field di formnya? Adakah pesan errornya saat
> menjalankan
> > query ini?
> >
> > Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> > Sofyan Efendi.
> > http://opi.110mb.com/
> > ----- Original Message -----
> > >From: Fajrie Shine
> > >To: Belajar Access
> > >Sent: Wednesday, June 01, 2011 9:57 AM
> > >Subject: [belajar-access] Cancel Update Table [1 Attachment]
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >Dear Master Access
> > >
> > >Assallamu'alaikum WR.WB
> > >
> > >Mohon Bantuannya lagi nih
> > >untuk cancel update table/ undo record update table saat
> > >record di delete
> > >vb saya seperti ini
> > >
> > >Private Sub Form_AfterUpdate()
> > >DoCmd.SetWarnings False
> > >DoCmd.RunSQL "Update Tbl_Barang SET [Stok Keluar] = [Stok
> > >Keluar] + " & Me.Quantity_Barang & " - " & oldQty & "
> > >WHERE [KodeBarang] = '" & Me.cb_kode_barang & "'"
> > >DoCmd.SetWarnings True
> > >End Sub
> > >
> > >Bagaimana caranya ya???
> > >Terimakasih
> > >Wassallamu'alaikum WR.WB
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> > >
> >
>
Re: Bls: [belajar-access] Cancel Update Table
Private Sub Form_Current()
If Me.NewRecord Then
oldQty = 0
Else
' ganti :
' oldQty = Me.Quantity_Barang
'dengan :
oldQty = Nz(Me.Quantity_Barang.OldValue, 0)
End If
End Sub
'' aplikasinya sudah cukup lengkap juga ya .... ( good !!! , niru gayanya ...?? lupa , yang jadi moderator Indonesia mencari Bakat)
'===========
--- In belajar-access@yahoogroups.com, Fajrie Shine <fajrie_shine@...> wrote:
>
> Dear Mr. Sofyan
>
> Ini file *.accdb nya pak,,,,
> saat terjadi transaksi, jika transaksi di batalkan, nantinya akan ada pesan
> yang muncul, pesan untuk update tbl_ Barang, Jika milih No nantinya malah
> muncul debug
> Mohon Bantuan untuk perbaikannya pak,,,,
> Sekalian minta bantuannya untuk pembuatan form
> hehehehe
> sy gak bisa buat form seperti yang di inginkan
> gambarannya saya sertakan bersama di dalam Attachment
> Mohon Bantuannya pak untuk pembuatan formnya
>
> Terimakasih
>
>
>
>
>
> ________________________________
> Dari: Sofyan Efendi sofyanefendi@...
> Kepada: belajar-access@yahoogroups.com
> Terkirim: Rab, 1 Juni, 2011 11:45:51
> Judul: Re: [belajar-access] Cancel Update Table
>
>
> 
> Dear Mas Fajrie, pada:
>
> & oldQty &
>
> Apakah oldQty itu nama field di formnya? Adakah pesan errornya saat menjalankan
> query ini?
>
> Wassalaamu'alaikum Warahmatullahi Wabarakatuh,
> Sofyan Efendi.
> http://opi.110mb.com/
> ----- Original Message -----
> >From: Fajrie Shine
> >To: Belajar Access
> >Sent: Wednesday, June 01, 2011 9:57 AM
> >Subject: [belajar-access] Cancel Update Table [1 Attachment]
> >
> >
> >
> >
> >
> >
> >
> >Dear Master Access
> >
> >Assallamu'alaikum WR.WB
> >
> >Mohon Bantuannya lagi nih
> >untuk cancel update table/ undo record update table saat
> >record di delete
> >vb saya seperti ini
> >
> >Private Sub Form_AfterUpdate()
> >DoCmd.SetWarnings False
> >DoCmd.RunSQL "Update Tbl_Barang SET [Stok Keluar] = [Stok
> >Keluar] + " & Me.Quantity_Barang & " - " & oldQty & "
> >WHERE [KodeBarang] = '" & Me.cb_kode_barang & "'"
> >DoCmd.SetWarnings True
> >End Sub
> >
> >Bagaimana caranya ya???
> >Terimakasih
> >Wassallamu'alaikum WR.WB
> >
> >
> >
> >
> >
> >
> >
> >
>