Hi all,
Does anybody knows how to stop On Current Event? I have a loop under On Current event which will keep looping until time >= 9.00 a.m. When current time reach or exceed 9.00 am I want to stop the looping under the Form's On Current event.I've tried to put the coding in the On Timer event...
Hi All....
I have a system which record test sessions. I need to automatically CLOSE the test session if the date for that particular test session is equal to today's date and the time is 9.00 am and above. So...I put the code in the On Timer Event for the Sign On Screen so that when the user...
Hi all...
I have a program that requires to open the recordset of a query where the query has a few criteria. This is the coding:
dim rstQryEmployee as DAO.Recordset
set rstQryEmployee=CurrentDb.OpenRecordset_
("QryEmployee", dbOpenDynaset)
The above codes works fine...
Hi GHolden,
i'm getting a sintax error from the SQL.This is how i code it:
Dim strsql as string
'****sintax error here*****
strsql=INSERT INTO TBLTEMP SELECT * FROM TBLMAIN WHERE_
TBLMAIN.ID NOT IN (SELECT TBLTEMP.ID FROM TBLTEMP);
'**************************
DOCMD.RUNSQL "strsql"
I need to add certain data from Table A into table B if and only if the data in table A does not exist yet in table B.
The problem is, when i use the DO UNTIL Loop, The 1st data in table B that doesn't match the 1st data in table A is consider as UNMATCH data by the system although if that data...
Hi,
I need to copy data from one table into another table and manage to do this if the destination table is blanks.When the destination table is not blank anymore(contains the first time copied data from the main table), then I want to add new data in the main table into the destination table...
The row source of this combo is taken from a query... and the combo is not bound to control source...
There is also NO codes to change the data source because its an unbound combobox.
On opening one of my forms I have a combo box in one of it's subforms that occasionally will not dispaly the value for the linked criteria it is opened with. It will flash for a split second then disappear.
It is also quite whimsical , sometimes displaying sometimes not.
The query for this...
Thanks Rolliee......u really help things out.....
using the "msgbox me.text0 " I found out that my query contains the wrong data.....after I change the query my Search/filtering function works fine........
In the query design view. Then right click anywhere on the query....but not in the query fields area.....then select Properties.....then u can find ODBC Timeout field. The default value of this field is set to 60...change this value to 0....
that's it!
Hi........I have this code under my FIND button. It works fine. Then just now I refresh the data in my link tables. After that this code does not work as it suppose to.....
This is the code:
Private Sub btnFind_Click()
On Error Resume Next
Dim ssql As String
Dim scriteria As String
scriteria =...
hi...
well i manage to solve this problem already...
It turns out that the ODBC timeout for the query to my subform is not set to 0.....so....i actually doesn't have to set the ODBC timeout in VBA at all........
:)
Thanks....but i'm not on the NT network...
I've take a look at Ms Access help.....and it says that the ODBC timeout for the query that is bound to the form should be set to 0. In my case the problem is that i'm using an SQL statement on the query that is bound to my form....so I have to set the...
Hello....
I have a form that is bound to a query that are build from another query.
When i open up my form.....an SQL statement based on that query will run....and the form will be displaying only the required data.........
My problem is that.....some PC can go through this process (the opening...
this codes works...i got it from another forum:
Private Sub txtDesc_KeyDown(KeyCode As Integer, Shift As Integer)
If ((KeyCode = vbKeyDelete) Or (KeyCode = vbKeyBack)) Then
KeyCode = 0
End If
End Sub
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.