Search results

Hi giacomo, I think if you add [] around general it should work. e.g.strSQL = "Select Distinct Customer_Cell_Number from [General] " _ & "Order By Customer_Cell_Number" Dave

Private Sub Command1_Click() Shell "C:\Windows\Explorer.exe", vbMaximizedFocus End Sub

Could you post the code behind your buttons? Might help in finding the problem. Dave

Check the name of your textbox (is it a textbox?). Make sure it is SRNumb. If I understand correctly, your field in your table is called SRNumb and your textbox is also called SRNumb. If for some reason your textbox isn't called SRNumb, then you would get this error as you are trying to...

Hi KelMcc. May I ask a stupid question? When you say you tried entering "=me.openargs" into the "On Open" properties of the form, did you enter it straight into the properties window? If you did then this is your problem. You need to click on the down arrow on the right hand side of the...

I tried your code and it seemed to work fine, which is very odd. Only thing I can suggest is to make sure you have the line: On Error GoTo ErrorHandler at the top of your code. Also, some of the above code is never going to be used. You could change this to: On Error GoTo errorHandler . . ...

You could do something like this: Private Sub tabView_Change() On Error GoTo errorHandler DoCmd.Echo False If tabView = 1 Then ' 1 being the page number you want to password protect If InputBox("Enter Passord") <> "Holy" Then MsgBox "Incorrect Password"...

You can print a report using multiple selections in a listbox like this: Private Sub cmdView_Click() Dim strCondition As String For Each varItem In lstTest.ItemsSelected If strCondition = "" Then strCondition = "[testID] = " & lstTest.Column(0, varItem)...

One way of doing this is to use an SQL Statement to open the form with the specified records. Your command button: Private Sub cmdOpen_Click() Dim strSQL As String If cboSubject <> "" And txtKeyword <> "" Then strSQL = "SELECT Test.testID, Test.keyword, Test.subject FROM...

You probably have your combo box set to display 2 columns, with the first column hidden. In your combo box's properties, make sure the column count is set to 1 and column width is not 0 (can be blank). Dave

When you design your query for the combobox, right click in the top half of the query window and select properties. Change the "Unique Values" property to YES. This is assuming you only have one field in the query (subject)?

You can also pass information to a form using "openargs". For example, docmd.OpenForm "myForm",acDialog,,,,,"My sample Text" And then when you open the form: Private Sub Form_Open(Cancel As Integer) If openargs <> "" then txtMyTextBox = openargs end if End Sub Dave

Sam, When you enter the criteria into the query use : Like "H?S1??" which will return HRS112 HQS194 H2S1L5 etc If you are using a textbox to get the data from, use: like Forms![ItemSearch]![inputBox] and use the ? wildcard in the textbox. There are other wildcards you can use, just...

Try putting your msgbox in the On Change event of the Tab Control. Dave

Hi Ben, I'm not sure you need to do all this. You should be able to open the form (which is based on the Main table) and filter the records so only the record from the combo box is displayed. That's if i'm understanding you correctly, and it's highly probable that i'm not.:D Dave

Hi Marion, If .Execute() returns 0 it means it didn't find any files, so it is just going straight to the "End If" and skipping all your code. Not sure why this wouldn't work in the run time version though if it works in the full version. You could try changing msoSortByLastmodified to 4 and...

DoCmd.DoMenuItem acFormBar, acRecordsMenu, 0, 0, acMenuVer70

Ok, in Access you have Tables, Forms, Queries, Reports, etc. If you create a new query in design view, go to the "query" menu and choose "Append" or "Delete", and then design your query. When you have finished making your query, go to the view menu and choose "SQL View". The text you see here...

Not really sure about this, but I think the graphics program u use to reduce the image has a lot to do with the quality of the reduced picture. What program are u using?

Try something like this, where: tran2 is the table u are copying to, transaction is the table u are copying/deleting from, Child0 is the name of your subform (not the form itself), tranID is the unique identifier of the record being copied/deleted, Private Sub Command2_Click() Dim intID As...