Search results for query: *

Have you tried: If Len(Nz(TextBox, "")) = 0 Then Me.CommandButton.Enable = True Else Me.CommandButtonEnable = False End If Place this in your Form.Current and Form.Load section. :-)WB

Wouldn't it be better to just have a report built with the 3 fields instead? FirstName LastName CompanyName ------------------------------------------ John Doe Deere And then have the button just display the report when clicked. Also you will need to build the query to...

POSTMANPHAT THANKS! Sometime when my brain goes dead I come here! You guys are awsome! :-)WB

I can't figure out how to update a field with firstname initial and lastname in that field. I know how to use the Trim function and putting two fields togather but figure out how to take the first letter of the first name and the whole last name. Thanks! :-)WB

No that didn't work either. I think it might be a "flaw" in Access 2003. If I manually click back to the first record then the focus comes off the new record. And it works fine. If I just simply tab through the new record without typing anything in any of the fields it is still making that...

It is on the Main Form. It can't be on the sub-form. :-)WB

Here is the code: Private Sub SendOrder_Click() Me.frmParts.Requery 'sub-form in datasheet view DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 If IsNull([VendorName]) Then msg = msg & vbCrLf & vbTab & "- Vendor Name" If IsNull([VendorAdd1]) Then msg = msg & vbCrLf &...

It is a very simple form with a sub-form in data sheet view. The user needs to fill out all of the 4 fields in this data sheet. After wards they will press the Send Order button which will validate to make sure all required fields have been entered. And now here is the problem: I am getting...

That is exactly what I end up doing. Thanks for the tip though. :-)WB

Here is what I need to do: 1 - Already have a button called Send Email. 2 - Need to be able to send a report as an attachment using SafeMail.myAttachments method. I know how to use DoCmd.SendObject property but how do I combine the two togather so the report gets attached to the email and is...

onpnt, I am the only IT guy here. I do everything here. LOL. Unlike the example in your video our website has no personal data. If someone wants to know the spec for a Bobcat then they can hack all they want. Anyways, I did everything you said. I also added form validation so the user has...

onpnt, Thanks for all the insight here. I love picking on MS because that is all I use here. It is a love-hate thing I have with them. Don't take it personal. Your idea is that if someone tries to submit a "blank value" then they can see your stuff. But wouldn't a form validation take care of...

onpnt, "Error Free Code" - I like that. Ask Microsoft if their code is Error Free - LOL. Sorry I don't believe anyone can be perfect. We can all strive towards perfection. Anyways, Ok little confused here. you are saying this about the following: Split(Request.Form("SearchValue")," ")...

onpnt, You have a valid point. But in my case: 1) It is hosted on 1and1.com. 2) the DB is an Access Database - no SQL involved here. 3)The above code gets the job done - the hackers can steal all the info on equipment rentals they want and there are no usernames or passwords in the...

You will need to get the MS Package from 1and1 as you are not upgrading but really side grading. By default they give you the Linux package. I have several sites that are hosted on 1and1. Make sure your site is backed up before you make the move. :-)WB

Howard, THAT WORKED!!! AWSOME!!! THANKS AGAIN!!!!! PS: My company website that I setup a long time ago was missing this search feature. You can see the website here: http://www.capitalrentals.com/equipment.asp :-)WB

...= Server.CreateObject("ADODB.Recordset") Dim searchArray : searchArray = Split(Request.Form("SearchValue")," ") strSQL = "SELECT * FROM tblGroups WHERE [Active]=true AND (" Dim searchItem For searchItem = 0 to uBound(searchArray) strSQL = strSQL &...

The error I am getting is: Expected end of statement /search_result.asp, line 66 strSQL = strSQL "[GroupName] like '%" & searchArray(searchItem) & "%'" Thanks for the help! :-)WB

...& ";Persist Security Info=False" oConn.Open connect %> <% Set oRS = Server.CreateObject("ADODB.Recordset") strSQL = "SELECT * FROM tblGroups WHERE [Active]=true and [GroupName] like '%" & Request.Form("SearchValue") & "%' ORDER BY [GroupNumber]" oRS.CursorType = 2 oRS.LockType =...

...searching for a combo of words and it doesn't work. Here is the coding: Set oRS = Server.CreateObject("ADODB.Recordset") strSQL = "SELECT * FROM tblGroups WHERE [Active]=true and [GroupName] like '%" & Request.Form("SearchValue") & "%' ORDER BY [GroupNumber]" oRS.CursorType = 2...