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 TouchToneTommy 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 ajdesalvo

  1. ajdesalvo

    Open file and link Drawing to OLE field

    First set the focus to the feild in your form that is for the OLE Object in your table. Then use Runcommand to browse and insert the object: Forms![YourForm]![VisioField].Setfocus DoCmd.RunCommand acCmdInsertObject Good luck! Anthony J. DeSalvo President - ScottTech Software...
  2. ajdesalvo

    How to have a control over the excel file when import into Access

    I had trouble with the column being named with periods in the heading (Ext. Ref Num.). Seemed to import okay when I removed the dots. Let me know! Anthony J. DeSalvo President - ScottTech Software "Integrating Technology with Business"
  3. ajdesalvo

    Text Box Conditions

    No problem sorry it took so long! Good luck! Anthony J. DeSalvo President - ScottTech Software "Integrating Technology with Business"
  4. ajdesalvo

    Text Box Conditions

    Move the code to the Form's "On Current" event. You need to test every time the record changes in the form. Anthony J. DeSalvo President - ScottTech Software "Integrating Technology with Business"
  5. ajdesalvo

    Text Box Conditions

    Place a break point on the line below: If TargDate < Date() Then then open the form. When the code stops, place the cursor over the TargDate variable. What is the value? Anthony J. DeSalvo President - ScottTech Software &quot;Integrating Technology with Business&quot;
  6. ajdesalvo

    Text Box Conditions

    If the first column is the word open or closed, and it is the bound column, then you could use that: Dim TargDate as Date TargDate = Forms![frm_Main_Issues]![TargetResolutionDate] If Me![StatusID] = &quot;Open&quot; Then If TargDate < Date() Then...
  7. ajdesalvo

    Text Box Conditions

    Have you plaed a break on the second If statement line? Once it stops there, highlight all of Forms![frm_Main_Issues]![TargetResolutionDate] and place your cursor over it to see what the value is. You could try to dimension a variable for the value of...
  8. ajdesalvo

    DLOOKUP STATEMENT PLEASE HELPPPP

    I'm sorry, but I still haven't grasped your layout! The analyst sees the records that the manager has assigned them? So, you update all records in a work table with the NT logons selected by the manager with the analyst that is assigned to them? Anthony J. DeSalvo President - ScottTech...
  9. ajdesalvo

    Shell Command

    Application.FollowHyperlink will open a browser window. Anthony J. DeSalvo President - ScottTech Software &quot;Integrating Technology with Business&quot;
  10. ajdesalvo

    Shell Command

    Say you have a text box control called WebAddress and a comand button on a form. Enter http://www.yahoo.com in the text box. Then in the Click event of the command button: Application.FollowHyperlink Me![WebAddress] Hope that helped! Anthony J. DeSalvo President - ScottTech Software...
  11. ajdesalvo

    DLOOKUP STATEMENT PLEASE HELPPPP

    I am still a little unclear as to your application, so I may have to ask you several questions until I get a good understanding. So, if you are willing and patient, I will press on! Is your goal to select a NT logon in the main form and then populate a working table with data that is in the...
  12. ajdesalvo

    DLOOKUP STATEMENT PLEASE HELPPPP

    DLookup will only return one value. Are you building a report, or trying to display the data in a form? Anthony J. DeSalvo President - ScottTech Software &quot;Integrating Technology with Business&quot;
  13. ajdesalvo

    Text Box Conditions

    Okay, replace all frm_Main_Issues![TargetResolutionDate] with Forms![frm_Main_Issues]![TargetResolutionDate] If Me![StatusID].Column(1) = 1 Then If Forms![frm_Main_Issues]![TargetResolutionDate] < Date() Then Forms![frm_Main_Issues]![TargetResolutionDate].ForeColor = 255 ElseIf...
  14. ajdesalvo

    Text Box Conditions

    In the control's property for Forecolor, is that set to 0? Now that I know what columnof the ComboBox is the bound column try: If Me![StatusID].Column(1) = 1 Then If frm_Main_Issues![TargetResolutionDate] < Date() Then frm_Main_Issues![TargetResolutionDate].ForeColor = 255 ElseIf...
  15. ajdesalvo

    how to delete a record

    In the command button Click event: DoCmd.RunSql &quot;Delete * FROM [Employees] WHERE [Payroll Number] = '&quot; & Me![payroll] & &quot;' ;&quot; Hope this helped! Anthony J. DeSalvo President - ScottTech Software &quot;Integrating Technology with Business&quot;

Part and Inventory Search

Back
Top