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!

Search results for query: *

  1. hermanlaksko

    switch between two open database

    I use this code to do that: Function OpenMDB() Dim Sti, hWnd As Long If Not WindowIsOpen("YourMdbName÷", True) Then Sti = GetDBPath & "MdbName.mdb" If Dir(Sti) = "MdbName.mdb" Then Shell "MSAccess.EXE " & Sti & " /CMD:" & Forms!Main!ID, vbMaximizedFocus Else hWnd =...
  2. hermanlaksko

    Access send email attachments - problem when null or empty

    Ahh.. forgot the IsBlank function - but strongm's <>"" works just the same, however the IsBlank function checks for null, empty, etc. all in one. '*********************************************************************************************************************** ' Navn : IsBlank '...
  3. hermanlaksko

    Access send email attachments - problem when null or empty

    I have over the years used this and expanded this code perhaps it can be of some use to you. As you can see org. code was developed by Helen - If you do not know her look her up on the web, she is very informative and worth a visit :)...
  4. hermanlaksko

    How to send email from vb.net program using modern authentication

    Perhaps this will help. SendMailMB(ToEmail, FromEMail, SubjectTxt, EText, , , , PDFfile, XlFil) Function SendMailMB(ByVal sTo As String, ByVal sFrom As String, sSubject As String, sBody As String, Optional sCC As Boolean, _ Optional sBCC As Boolean, Optional sReplyTo As String = "", Optional...
  5. hermanlaksko

    Outlook VBA - Trust access

    MSec = OApp.Application.CommandBars.ExecuteMso("MacroSecurity") ' Perhaps this i the line in access 2016
  6. hermanlaksko

    Outlook VBA - Trust access

    Try this Sub OpenTrustCenter() Dim MSec As Integer, OApp As Object Set OApp = CreateObject("Outlook.Application") MSec = OApp.Application.explorers.Item(1).CommandBars.ExecuteMso("MacroSecurity")' This will open the trustcenter for the user to change the current setting. End Sub
  7. hermanlaksko

    CTRL + BREAK from second macro button

    Perhaps I am overlooking something - but your "continue_macro:" does nothing - so either it should not be there or it should call "macro_timer" or something else [smile] Herman Say no to macros
  8. hermanlaksko

    MsgBox only showing in Ils test

    Hi Mikrom No its code in a .vb file. What I am trying to do is to get the code to show a msg var. places in the code so I know how far it is running. I have added msgbox's var places in the code (not shown above) like "Msgbox("Text 1")" etc. so it could tell me where it fails. My problem is...
  9. hermanlaksko

    messagebox is not declared

    Excellent and well explained - Thx for clearing this up Mikrom Herman Say no to macros
  10. hermanlaksko

    MsgBox only showing in Ils test

    This will not show the msg on screen - VB.net file called from vb code behind screen Try SMTP.Send(Mail) Retry = True Catch ex As Exception If Not Retry Then MsgBox("Failed to send email reply to _ " & Mail.To.ToString() & "."c, vbOKOnly, "Title")...
  11. hermanlaksko

    Delete an array element - HOWTO?

    Interesting question, it made me look around and I found this on stackoverflow So i tested it, and it does the trick: Sub DelEle(Ary, SameTypeTemp, Index As Integer) '<<<<<<<<< pass only not fixed sized array (i don't know how to declare same type temp array in proceder) Dim I As Integer, II...
  12. hermanlaksko

    messagebox is not declared

    Hi Mikrom Thk for replying to my Q Ok so as I understand you there is NO diff btwn the two MagBox and MessageBox? I was undet the impression that the latter had more options etc. Herman Say no to macros
  13. hermanlaksko

    messagebox is not declared

    I would like to use messagebox in my code but get the above error msg. I use MsgBox but think that messagebox is more flexable and have more features. Do I need a messagebox function to get this to work or what do I have to "import"? Herman Say no to macros
  14. hermanlaksko

    Ribbon screentip issue

    Thanks Strongm Yes it does, I would have liked to have the screestips but without the extra information. So only a ½ solution also I can not get rid of this on enduser pc's. But atleast I now know why and where :-) Thanks! Herman Say no to macros
  15. hermanlaksko

    Ribbon screentip issue

    Hi Combo What happens when F1 is pressed?, well the help screen appairs, but the point is to get rid of the option and text. If you have any idears on how to remove this please let me know - thank you in advance. Herman Say no to macros
  16. hermanlaksko

    Ribbon screentip issue

    Hi Combo No there is not add-in the ribbon is created from scrach in VBA/XML directly in a module. Herman Say no to macros
  17. hermanlaksko

    Ribbon screentip issue

    Hi Strongm Long time :-) The problem is not taking a screen dump, that bit is easy, the problem is that (as shown on my pic, above) the ref. to the form MrHide and the text "Press F1 to..." is there, for the end user, this information is useless so the question is, how to get rid of those two...
  18. hermanlaksko

    Ribbon screentip issue

    Yes Andy, my thourghts exatly :-) As you can see there is a ref. to the "hidden" form MrHide and a short text "Press F1...." How does one get rid of the ref. and the hlp text? Herman Say no to macros
  19. hermanlaksko

    Ribbon screentip issue

    When showing the screentip of the selected button I see a ref to the current open form and a small text "Press F1 for added help" can one get rid of this disturbing mesage that has nothing to do with the program/base as such. Herman Say no to macros
  20. hermanlaksko

    Ribbon on the fly (XML)

    WOW - Strongm Thank you so much, I will try that right away. Herman Say no to macros

Part and Inventory Search

Back
Top