*
My code is similiar, but it is executed On_Delete event of the main form which recordsource is not related to tblTest.
Maybe the problem arises from the code being executed On_Delete event (even though the form from which On_Delete is executed is not related to tblTest)?
Is there any way to...
Thanks for your replay
Sorry I couldn't reply earlier.
My code is similiar, but before this code is executed On_Delete event of the main form which recordsource is not related to tblTest
Maybe that's why I'm having the problem?
Is there any way to do it with On_Delete event?
inso18
Nope, doesn't work for some reason.
I've tried also to do .Form.RecordSouce = "" but get the error "Operation Not Possible when in Transaction" or something of that kind
Only if I delete the subform from the form manually, or reset its RecordSource manually before performing the delete does...
Requery doesn't help, refresh can't be done cause there are no underlying record source to refresh.
I thought there might be some special command or hack for unlocking the table immediately that that the more skilled Access users might know about.
Hi Everyone.
I have a subform within a form. In the form there's a command that deletes fields from the table (tblTable) on which the subform is based.
The command deletes fields from tblTable by executing the sub:
Sub Delete1()
DoCmd.RunSQL "ALTER TABLE tblTable DROP COLUMN Field1"
End...
Hi Everyone.
I have a main form with a subform, they are bound with a common key (linked child and master fields).
After changing a record in the main form I try to execute
Call Me.sfrmSubForm.Form.GoToLastRecord
Which is:
Public Sub GoToLastRecord()
DoCmd.GoToRecord , , acLast
End Sub...
Hi Everyone.
I'm trying to alter externally the default value in a table.
I've tried this:
ALTER TABLE tblDocs ALTER COLUMN F10 SET DEFAULT "text1"
and this
ALTER TABLE tblDocs ALTER COLUMN F10 SET DEFAULT 'text1'
without success.
Does anyone know how can this be done via SQL or via DAO...
Hi Everyone.
I have a subform container (sfrmGroups) with a frame buttons above it. Each button loads a different source object for the container. Also each time a new source object loads, the following VBA code is being performed:
Do While rs.EOF = False
If rs!GroupId = lngGroupId Then...
Roy-Vidar,
thanks for giving me several arguments and what are the benefits and disadvantages of each method.
I'll test both methods myself, and see which one is more speedier for me.
Can cascading system fail?
Regards,
inso18
Hi Everyone!
I have a database with a commonly used table of about 500 records. This tables includes a 40-char text field of object's name with unique values. The field is called ObjectName, and it is currently my Primary Key for this table.
My question is, should I add an Autonumber field...
SELECT ttblData.NetAcBranchGrade
FROM ttblData INNER JOIN qryRoundCurrNet ON ttblData.RoundId=qryRoundCurrNet.RoundId
GROUP BY ttblData.BranchId, tblRoundAll.NetAcBranchGrade
HAVING (((ttblData.BranchId)=Reports!rptGraph!BranchId))
ORDER BY ttblData.BranchId;
The query shows the correct results...
Dear CautionMP,
thanks for your reply
In the code I've pasted in my first post I've intentionally made the check to be sure the that [Reports]![rptGraph] does exist before that Set line:
Set Qry_RoundOrder = MyDB.OpenRecordset("qryRoundOrderCurrNetSel", dbOpenDynaset)
Debug.Print...
Hi Everyone.
I'm using a code to leave some things dynamic in a report (rptGraph):
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim MyDB As Database, Qry_RoundOrder As Recordset, Qry_GraphData As Recordset
Set MyDB = CurrentDb()
Set Qry_RoundOrder =...
Hi Everyone.
I'm having trouble in trying to refer to a control in a Report through a variable
So far I have attempted this:
(i = VBA variable, txb1, txb2 ... are report's controls)
Me("txb"& i).Caption = "1"
Reports!MyReport("txb"& i).ControlSource = "field" & i...
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.