yes I'm quite aware and I don't want it to be MT...
because it is a web input stream...
Thx for all the help, i figured out another method to do what I wanted.
Try this:
Private Sub addButton_Click()
On Error GoTo Err_addButton_Click
Dim stDocName As String
Dim stLinkCriteria As String
Dim SupID
DoCmd.RunCommand acCmdSaveRecord
SupID = Me![SupplierID]
stDocName = "frmProducts"
DoCmd.OpenForm stDocName, , , ...
It doesn't comply to:
if you run:
docmd.openform "Testform"
msgbox("test 1")
forms!testform.modal=true
msgbox("test 2")
The msgboxes appear after another without the code to wait for the Testform to close
I even tried this code but it is VERY SLOW and not usable:
docmd.openform...
This get method would be nice but i have some connection open and pulling data from somewhere else so I have to put not get the data
The data is stored in string variables (>64k) so the openargs does not work
and the data is NOT in the forms.controls of any form!
With the suggested method I...
You're searching for the last occurence of a space in a string so you use something like this code:
dim db as database
dim rs as recordset
dim a as long
dim s as string
dim position as long
set db=currentdb
set rs=db.open("MyTable")
' --- insert here the standard check if rs is opened ---
...
"WHERE SCREEN_ADD_PRODUCT.SAL_ACCOUNT = '" & CBO_SAL_ACCOUNT.Value & "' " & _
“WHERE SCREEN_ADD_PRODUCT.CURRENT_PRODUCT = True"
You are using a "&" instead of "AND"
I'm wanting to do the following steps:
1) open form
2) set some fields in this form via VB
3) make the form acDialog so that code waits for the form to be closed
My problem:
How can I make a form acDialog after opening? Is this possible?
I don't want to:
- use global variables
- use table...