Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations wOOdy-Soft on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by Umbane

  1. Umbane

    Create tables automatically from user input

    I would like to make tables for user input as to what tables are required and what fields need to be in the table. For example: Have a table that has the following fields TableNameID FieldName DataType Description Then have a form that the user types this information in, and a command button...
  2. Umbane

    set control value

    This is possibly a very simple thing I am trying to do, but for the life of me I can't seem to get it right. I am trying to set the name of a control in vba and then set it's value to a stored value. Method 1 (Which Works) eg. Dim MyCtl as Control Dim MyFrm as Form Set MyFrm = "frmABC" Set...
  3. Umbane

    Count the records in a table to use value

    Thanks guys, I think I got it. Code now looks like this: Forms!Orders.RecordsetClone.MoveLast MsgBox "My form contains " _ & Forms!Orders.RecordsetClone.RecordCount _ & " records.", vbInformation, "Record Count" Just replace the red text with whatever form name you are using.
  4. Umbane

    Do While and Loop Statement Error

    I did that but still get the same error, Is it normal that the error will point to the do loop, even though there might be an end if missing? If so, is this a bug or is it intentionally done so?
  5. Umbane

    Count the records in a table to use value

    Open my form with all records, then after pressing a button I want to calculate programmatically how many records there are so that I can use that number in a do loop statement
  6. Umbane

    Do While and Loop Statement Error

    Using the code: Dim Check, Counter Check = True: Counter = 0 ' Initialize variables. Do ' Outer loop. Do While Counter < 20 ' Inner loop. Counter = Counter + 1 ' Increment Counter. If Counter = 10 Then ' If condition is True. Check = False ' Set...
  7. Umbane

    Roundup Function

    Thanks for the help guys, Dan, your'e a genius.
  8. Umbane

    Roundup Function

    In Excell, using roundup produces the following results: ROUNDUP(45.2,-1)=50 ROUNDUP(45.2,0)=46 My 1st question is: Is there a function in access that will produce the same result? Secondly, if not, how to go about writing the code? Thanks for now
  9. Umbane

    Type mismatch running a query (using a module)

    I'm not sure this will help, but you should check the following. Even though the query results appear to be fine (Visually speaking ) you're probably using a combo box to select the skill in a form (or query), then hiding the value of the index so that the user sees the skill; however access...
  10. Umbane

    Setfocus on a subform

    Hi Missy Ed Thanks for the help but it still does not move the focus to the desired field. Maybe I should try redesigning my form so that it doesn't need all the subforms. Umbane
  11. Umbane

    Setfocus on a subform

    I have a form with a subform, and the subform has a subform also. On the main form, in the form header section I have an unbound combo box from which the user must select a client. On the after update event of the combo box I want the focus to go to a record on the second subform so that data...
  12. Umbane

    Would like to have combobox accept name not in list and update list.??

    I have some forms which do the same and I use this code, see if it helps. Private Sub City_NotInList(NewData As String, response As Integer) Dim db As Database, rs As Recordset Dim strMsg As String strMsg = &quot;'&quot; & NewData & &quot;' is not an available City Name&quot; strMsg...
  13. Umbane

    Passing user login from SQL to Access97

    I got this little piece of code courtesy of The Access Web Forms Index, hope it helps you. Private Sub Form_BeforeInsert(Cancel As Integer) Me!UpdatedByUser = Environ(&quot;username&quot;) ' this is the NT loginID Me!UpdatedByUser = CurrentUser() ' use this line if you want...
  14. Umbane

    MSComm32

    Has anyone ever used the MSComm32 control in Access, if so what is the correct way of getting the data coming in on the serial port to be displayed in a text box. I have used the control from VB 6.0 and it works great but Access doesn't seem to support the MSComm1.Input method. I have posted on...
  15. Umbane

    MSComm32

    Has anyone ever used the MSComm32 control in Access, if so what is the correct way of getting the data coming in on the serial port to be displayed in a text box. I have used the control from VB 6.0 and it works great but Access doesn't seem to support the MSComm1.Input method. I have posted on...

Part and Inventory Search

Back
Top