Search results

I fill out a treeview based on a series of tables that represents locations. For example tblLocation LocationID Location tblArea LocationID AreaID Area tblRow AreaID RowID Row tblPlot RowID PlotID Plot The Treeview uses the following code to populate itself in the form. Dim NodX As Node...

Cool Worked great...just needed to move that " to after the Where. Thank a bundle again!!!

Ran into a problem trying to utilize the same concept The real change comes in that the string I build off of the Iff statement does NOT have any preceding Where conditions in the SQL statement... .Open "Select * From tblContactCompany Where & CompVal" Is the sql statement I set the value...

When you have multiple columns in a list box they get divided by a thin gray line..how can I get lines to divide the records?

Excellent!! It worked...Thank you. Thank you. Thank you. I have been banging my head on the wall over that for two days now. Much appreciation!!

Sort of works but not quite. Thanks for the reply..I appreciate the time. The solution you gave almost works but not quite. What occurs with the code you gave me is that If the Middle Initial text box is Null the it basically pulls up any values that have the same last name and first name...

That works PERFECT!!! That is cool. Thanks a bundle for the help!

Say I have a form with a List box that display last names. And there is a text box on the form where the user can enter in letters. How can I autselect the records according to whats in the text field automatically. Say the user enters in the letter H Then the list field automatically moves...

I am trying to build an ADODB recordset. Here is my code Set Recordset = New ADODB.Recordset With Recordset .ActiveConnection = CurrentProject.Connection .CursorLocation = adUseServer .CursorType = adOpenKeyset .LockType = adLockOptimistic .Open "Select *...

I have a wizard that has two pages to it. In the first page the user selects an option from a drop down combo box. The value selected fills a treeview in the second page with certain items related to the option chosen. However when the use click back and changes the item selected in the combo...

Here is my query .Open "SELECT tblLocation.*, tblArea.* FROM tblArea INNER JOIN tblLocation ON tblArea.LocationID = tblLocation.LocationID WHERE tblLocation.LocationID =’” & Me!cmbLocation & “’ & tblArea.AreaName =’” & Me!txtArea & “’;" I suspect that the problem is because the...

I have created a wizard using pagebreaks and the wizard works fine...I have however run into a problem where tabbing through controls is not relegated to a specific page break. What ends up occuring is that if I tab too far the window shifts up into the next page and I dont want it to do...

I need to check for IsNull on four of the five controls on a form. If there was only one control I would just write the code at the start of the procedure to If IsNull Then MsgBox "You must yadda yadda yadda", vbOKOnly + vbCritical, "Error" Else REST OF PROCEDURE However the...

Figured it out...never mind

Ok I actually am fairly close...at least I have narrowed down my problem. It relates to the treeview node, Key parameter. Conseider this When I build the nodes for the treeview I use this bit of code Do While Not rs.EOF With Me!TreeViewEmployees .Nodes.Add , , "Employee " &...

Using the following code to build a recordset Dim rs As Adodb.Recordset Dim strEvent As String Set strEvent = 1 Set rs = New ADODB.Recordset With rs .ActiveConnection = CurrentProject.Connection .CursorLocation = adUseServer .CursorType = adOpenKeyset .LockType =...

Dealing with a MS Treeview 6.0 with the property set to use check boxes. Normally this process only check the node selected and ignores the parent child relationships I have managed to get some code that automaticaly checks parent nodes when a node is checked and unchecks child nodes if the...

Ok I figured it out For those interested I used this code Private Sub TreeViewLocation_NodeCheck(ByVal Node As Object) On Error Resume Next ' In case there are no parents or parent.parents Dim NodX As Node, NodY As Node, NodZ As Node, strNodeKey As String If Node.Checked Then...

I just resolved it .Open "SELECT * FROM tblArea WHERE tblArea.AreaName <> 'na' And tblArea.LocationID = " & [Forms]![frmSelectLocationStartDefault]![cmbLocation] & " ORDER BY tblArea.AreaName;" I needed the & in the statement

Could someone double check my query expression below. Something is not right I know but I cant figure out what it is. I think it is a part of the And tblArea.Location = [Forms]![frmSelectLocationStartDefault]![cmbLocation] but I cant be certain....Just an fyi that cmbloacation data type is...