Search results

Just remove the * out from the SQL like this: [code] ... & "[tbl_bscactivity].[implementation_date] AS [Implementation Date], " _ & "[tbl_bscactivity].activity AS Activity, [tbl_bscactivity].[mar_reference] AS [MAR Reference], " _ & "[tbl_bscactivity].[service_affecting] AS Effect...

Sorry. I don't quite understand what you want here. You want to show only a certain fields? So what fields do you want to show? Or you want to show only a certain part of a given field? To do this, you can use Left(), Mid() or Right() to help. Or to filter the query with a wild card like...

Then change this part from: ... & "FROM tbl_bscactivity " _ & "WHERE ((([tbl_bscactivity]. [network_element])=" If [forms]![frm_reports]![frmnetworkelement].[value] Like "BSS Iligan" Then strSQL = strSQL & "[network_element]" Else strSQL = strSQL &...

I guess it has to do with this line: ... If [forms]![frm_reports]![frmnetworkelement].[value] Like "BSS Iligan" Then strSQL = strSQL & "[network_element]" Else ... What is the [network_element]? Is it a field name? Check the qry_bscactivity query and view it manually and see if it...

Sorry for that. Now try this. & [forms]![frm_reports]![beginningdate] & "# And #" _ & [forms]![frm_reports]![enddate] & "# " _ & "ORDER BY [tbl_bscactivity].[network_element] DESC;"

There are 2 ways to deal with your problem. 1. Make the query a real parametered query. Check this How to make a parametered query out. Then you can use what Pat has suggested lately. 2. Modify the SQL of the qry_bscactivity on-fly by replacing the parameters with the current values on the...

Sorry. Try this again. Private Sub Command1_Click() Dim ctl As Control For Each ctl In Me.<YouSubFormControlNameHere>.Form.Controls If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Then If IsNull(ctl) Then MsgBox "No null allowed"...

You can try this. Dim ctl As Control For Each ctl In Me.<YouSubFormControlNameHere>.Form.Controls If ctl.ControlType = acTextBox Or ctl.ControlType = acComboBox Then If IsNull(ctl.Name) Then MsgBox " ....." ctl.SetFocus Exit Sub End If End...

Check this out, Add/Remove Font API.

I would keep the BE copy in you notebook as well. When you are developing the application do it with this copy. Then when you want all users to use the latest version, distribute the FE to all. If there must be a few changes in the tables structure in the BE, do it with code or manual when you...

Try this out. Dim strAppName As String strAppName = "C:\WINDOWS\System32\mspaint.exe " & Chr(34) & "C:\database\images\a picture.jpg" & Chr(34) Call Shell(strAppName, vbMaximizedFocus)

Make sure that the excel file is there in c:\. Why don't you store the excel file in the same folder of the db? Then you can use a relative path like this. ... .workbooks.Open CurrentProject.Path & "\myFile.xls" ... The CurrentProject.Path is only available for A2K and higher.

Check this ACC2000: Using Automation to Create a Microsoft Excel Chart out.

If both db and user guide are in the cd, you can use CurrentProject.Path (Access 2000 or higher) or use the function below if you use Access 97 to get the relative path. Function fRelativePath() As String Dim strCurName As String strCurName = CurrentDb.Name fRelativePath = Left(strCurName...

Check this Access 2002 Rounding Function out.

You can check this Map Network Drive out.

Change this line from Set RS = DB.OpenRecordset("select * FROM tbl_companies where [company]=" & comp, dbOpenDynaset) to Set RS = DB.OpenRecordset("select * FROM tbl_companies where [company]='" & comp & "'", dbOpenDynaset)

Check this Hide "Loading Image" Pop-Up! out.

Or wait and skip to ADO.Net. Just bypass or ignore the ADO. Rumor has it that Access 2003 will introduce the ADO.Net.

Check this page out.