Search results

Capture the results of your query in a recordset. Dim db as database Dim rs as recordset set db = currentdb set rs = db.openrecordset("MyQuery") me.MyField = rs.fields(n) Where "n" is the field number that contains the data you need. Keep in mind that the Fields collection is zero based...

Is this something that needs to be done on the fly? If not, go to design view of the form...Go to the File menu...Go to Page Setup...Change the Orientation to Landscape...save the form.

check out A-Three boards. I replied there.

I'm an idiot. Works perfectly, thank you both. Scott

strSQL = "UPDATE tblTaskDaily SET tblTaskDaily.HoursWorked = " strSQL = strSQL & Me.txtActualHours strSQL = strSQL & " , tblTaskDaily.EstimateHours = " strSQL = strSQL & Me.txtEstimateHours strSQL = strSQL & " , tblTaskDaily.Comment = " strSQL = strSQL & "'" & Me.txtComment &...

I am using some SQL statements to create and update records in my app. If I enter a subject such as, "I'll be out of the office all week." into a record, an error is caused by the apostrophe in the word "I'll". How do I avoid the error while keeping the ability to use apostrophe's in my...

FYI - The problem seems to have been resolved. I saved the record and moved focus to another object before exiting the procedure that attached the document. Don't know why this worked. Scott

Please help! I have tried all the instructions from this site (http://support.microsoft.com/default.aspx?scid=%2fsearch%2fviewDoc.aspx%3fdocID%3dKC.Q295824%26dialogID%3d1550125%26iterationID%3d1%26sessionID%3danonymous%7c1372837) and still have the following problem. When I try to attach a...

Is it possible to display a report in a subform? Can I set the source object of a sub form to a report?

Hassan, You need to run an update query in the Click event of the unbound check box. In the following code, the table being updated is "tblStaff". The field being updated is "User". And the unbound checkbox is called "chkAll". Private Sub chkAll_Click() 'Turn off system warnings...

If you use refer to the Text property of the text box, it will have to have the focus to perform this function. The following would work... Private Sub Command1_Click() Text1.SetFocus Label1.Caption = Text1.Text End Sub The Text property is the default property of a text box, so if you don't...

In the on open event of the form, use DoCmd.MoveSize 1000 (right),1000 (down),1000 (width),1000 (height) The last two numbers will size the form. The first two will move the form a certain distance from the left and top of the screen. You can use the Auto Center property of the Pop Up form...

In the On Timer event of your form enter the following... If Me.CONTROLNAME.Visible = True Then Me.CONTROLNAME.Visible = False Else Me.CONTROLNAME.Visible = True End If Then set the form's Timer Interval so that it blinks as quickly as you want it to. 3000 = 3 seconds. Good luck...

It sounds like you are using an unbound image box. Make sure the image box has a control source (should be an OLE field in the person table). Scott access_junkie@hotmail.com [This message has been edited by scottfarcus (edited 10-22-2001).]

Thanks, surjer. But, I figured it out. I had to declare a GLOBAL object appAccess. When I "dimmed" Access.Application within the procedure, when the procedure ended, the Access object that I had instantiated fell out of scope and was terminated by default.

Can anyone help with some Access automation? Here is my code... ' Initialize string to database path. Const strPath = "C:\My Documents\" strDB = strPath & "Test.mdb" ' Create new instance of Microsoft Access. Set appAccess = CreateObject("Access.Application")...

Set the form's Pop Up property to Yes.

Better?

Try using columns in your combo box. Set Column 1 as the Bound COlumn and set it's width to 0". Then display the column with the data you want visible with a column width of 1". This way, the user sees column two, but column one is stored in the table. [This message has been edited by...

vbCrLf Should do what you're looking for.