Search results

  1. A

    Date Validation for input box function

    Surf_gecko, i suspect you are looking for the IsDate() function... ____________________________________________ Dim strInput As String Dim dtmInputDate As Date strInput = InputBox("Enter a value") If IsDate(strInput) = True Then     '-- do something with date...     '-- convert string date...
  2. A

    locking form color

    wizcow, It is easy to get Label controls to do what you want. Set the BackStyle property of your labels to 'Tansparent' and they will pick up the underlying background colour of the form (which by default uses the Windows System defined background colour). So far so good, some other controls...
  3. A

    Passwords, Network User Name

    ngoforth, Actually, the standard Textbox control in access already provides the functionality you need. Set the InputMask property for your password box to the value 'Password'. The textbox will then display * characters instead of the actual password being entered. As to how to pick up the...
  4. A

    Mask a Text field

    socko139, in actual fact, excel's standard text boxes have a built-in masking feature, that is not activated by default. if you look at the property list for the textbox you will find one named "PasswordChar". enter the masking character of your choice into this property ('*' for example) and...
  5. A

    Code help

    ian_ok, perhaps you mean: ... Then Me.End.Enabled = True if you don't add the '= True', the property value will not be changed. Hope that helps, axa
  6. A

    List box problem

    aqif, The RowSource and RowSourceType properties can be set through code to allow the listbox to show data from a pre-defined table or query, or your own sql statment For an existing table or query: RowSourceType = "Table/Query" RowSource = "YourTableOrQueryName" For your custom sql...
  7. A

    Call function problems

    Dachande11, Make sure that the command46_click() procedure in the main form is declared as Public: Public Sub Command46_Click() ... End Sub Once that is done, you will be able to call the procedure from another form etc... [forms]![product].command46_click() or...
  8. A

    Exporting Graphs out of Access!!

    johnnyw, First of all, i must say that i tend to avoid using Charts in Access Reports like the plague that they are... so i cannot help you with the details of using them. however, a long while back a friend asked me a similar question when she wanted to export a chart from an access report...
  9. A

    SQL in VBA

    northy, unfortunatly it is not possible to reference a vb variable directly from a query. however there is a simple work-around... you can reference user-defined functions from inside a query, so you could create a function to act as a wrapper for the variable you wish to use in your query...
  10. A

    Get username and computer name

    darrin, have a look at the reply i posted for the following posting, the code i posted will give you what you need. http://www.access-programmers.co.uk/ubb/Forum7/HTML/001946.html Hope that helps axa
  11. A

    running code from a menu

    jatfill, one workaround for this is as follows. a custom Menu Button's OnAction property can contain a call to a macro (as you know), and it can also call a Public Function that you may have defined in a vba module like so: =MyMenuFunction() and you can design your function(s) to accept...
  12. A

    help w/ vb code

    Purdue22, you could use the AfterUpdate event of the DateReceived text box. AfterUpdate is triggered once the contents of the textbox have been altered... Private Sub Date_Received_AfterUpdate()     '-- code here to update priority date... End Sub Hope that helps axa [This message has been...
  13. A

    Using "OR" in If...Then Statements

    Mike, each test in the If statment needs to be a seprate expression, like so... If FunctionName() = "ClarkL" Or FunctionName() = "SmithM" Or FunctionName() = "ThomasS" Then     Me.cmdEdit.Visible = True End If however, you can also use a Select Case statment to achive the same effect to do a...
  14. A

    VBA coding

    hi catt, when it comes to understanding common naming convetions used in access vba, the following link may help: http://msdn.microsoft.com/library/en-us/dnaccgen/html/msdn_20naming.asp the article above gives a good guide to common naming practices used in the access vba world and vb in...
  15. A

    Get Windows2000 Userid?

    bayman the following code certainly works on win98/NT - don't use Win2K at the moment, but it should work ok. the following code uses Win32 API. I have given a function for getting the UserName, and also a function for getting the Computer Name, as i find it is often usefull to have both peices...
  16. A

    Login System Coding Problems

    gyli84 here is an alternative version of the code below. you may find it easier to understand than the code you posted, and it should work as you want. __________________________________________ '--put this at the top of the form's module in the declarations section Private intLogonAttempts...
  17. A

    Verifying if records exist??

    Lisa Another 'quick and dirty' way of doing this would be to use DLookup()'s cousin, DCount(). you can use this to check how many entrys of a serial number are in the table, in other words if it returns a count of 0 for a serial number, it is not in the table. So you could use something like...
  18. A

    Checking serial number validity

    Hi Sara, you could use a version the following function to test the serial number: ____________________________________________ Function IsValidSerialNum(lngProdCode As Long, _                             lngSerialNum As Long _                              ) As Boolean...
  19. A

    Determining if value is a number or text

    eureka!! i have it! the answer to this one is annoying. after playing around with this i have discovered that the vb numeric functions are implicitly recognising the letters E (and D) to indicate that the number is expresed using scientific notation (ie 2E3 is the equivalent of 2 e+3 (or 2 *...
  20. A

    Syntax problem

    aziz, its just a slight mis-positioning of the index value, try this instead:- strSQL = "CREATE TABLE [tblSFF - COSAR03" & Index & "]([Record Type] TEXT (1));" the result will then be what you want: CREATE TABLE [tblSFF - COSAR031]([Record Type] TEXT(1)); Hope that helps, axa
Top Bottom