Search results

  1. J

    A 2013 conditional formatting

    It's not an Access solution, but it will work.... An http://www.iconico.com/colorpic/ you can find a tool which gives you the actual color on your screen.....
  2. J

    VBA dynamic email merge

    Lets say you have got a table customers with two field: name, email. This code below sends all customers with an email adres a message: Dim rstCustomer as Recordset set rstCustomer = Currentdb.OpenRecordSet("Customer") rstCustomer.Movefirst Do while not rstCustomer.EOF And Not...
  3. J

    Access 2013 and IF statments

    When you need to use several conditions I would use the Select Case statement. You can even nest several select cases... For example: Select Case Me.PC_Make Case "DELL" msgbox "I'am a Dell" Select Case Nz(PC_SERIAL_NUMBER,"") Case "" msgbox "No serial number" Case else 'Goto website.... Case...
  4. J

    VBA dynamic email merge

    CDO is a library which enables the possibility to mail directly using the SMTP server. This is in generally what you need to do (depending on the configuration of your SMTP server) Dim objMsg As Object Dim objConf As Object Dim flds As Variant Set objMsg =...
  5. J

    VBA dynamic email merge

    Have you the possibility of using an SMTP mail server? Then I suggest you use CDO. I got an example for you...
  6. J

    Users of an database

    Thanks for the reply. The solutions as quite easy. It's a pitty that the username for all users is admin. So I need to users the computername for identifying the user. Jack
  7. J

    Word doc saving path

    .... strPath = c:\users\ashfaque\desktop\ Doc.Saveas(strPath & "customers.doc") ....
  8. J

    Users of an database

    I have an project with a splitt database. The data is stored in the database_be.accdb I want to know which users are connected tot this database. Somebody got a suggestion?
  9. J

    filter popup form

    I don't know if it is the solution, but I think you forgot the wildcard * in your criteria. Try something like: str1 = "CUSTOMER_NAME Like '*" & Me.CUST_SEARCH.Text & "*'"
  10. J

    Alternative for GetTempPath

    Hi there, I used the 32-bit library to get a temporary filepath. But was looking for an alternative. I have created one myself: Dim oFS As FileSystemObject Set oFS = New FileSystemObject Dim strPath As String GetPath: strPath = oFS.GetSpecialFolder(TemporaryFolder) &...
  11. J

    Access 64-Bits - Random files

    Hello, I am using a API to generate a random / unique directory. This an API form a 32-bits environment. I know that you can still use it when declaring it with PtrSafe But does anybody has got a better alternative in 64-bits? This is the code I am using: Option Compare Database...
  12. J

    Problem with DOMDocuments

    Hello, My previous post was solved but the problem isn't. I am trying the get specific data out of an XML file. I managed to access a nodelist but I need more data. This is the XML file: <Document xmlns="urn:iso:std:iso:20022:tech:xsd:pain.008.001.02" xmlns:xsi="removed due to #posts">...
  13. J

    Problem finding a specific tags in XML

    I am using Access 2007. I have got an XML file with the folowwing structure: <Document xmlns="urn:iso:std:iso:20022:tech:xsd:pain.008.001.02" xmlns:xsi="redirect to the (link is removed!) XMLSchema-instance"> <CstmrDrctDbtInitn> <GrpHdr> <MsgId>006-2012-11-09-12:21:47</MsgId>...
  14. J

    Problem with Class Module

    Thanks for the links. But it did not answer my question. I will give some extra information. I have a Module in my Access database: see attachment Module.JPG I also have a ClassModule: see attachment ClassModule.JPG In a query you CAN use a function in the module: see Query1.JPG But functions...
  15. J

    Form parameters in vba with sql

    I agree with pr2-eugin but also think about the type of the field. When it is numeric you can use ... WHERE (((tbldrager.Id)= " &[Formulieren]![frm_gegevensinvoer]![txtId]& ")) " ... but when it is a text value you must use ... WHERE (((tbldrager.Id)= '"...
  16. J

    Opening a document with Word 2003 from VBA

    You can fully manage a mail merge within Access. I use the following code.... 'This is the variable which contains the name of the mail merge document Dim strTemplate as String Set objApp = CreateObject("Word.Application") With objApp .Visible = True 'The mail merge document is...
  17. J

    Problem with Class Module

    I have an Access 2007 database. In it there are Class Modules but also Modules. I have transferred all modules into Class Modules because of the use of variables and values in a multi user environment. Her is an example of a class module which does a validation check on a bankaccount number...
  18. J

    If Exists

    I find the function Dlookup very helpfull. You should try Dlookup("Barcode","Assets","Barcode = " & Me.History.Barcode) When the barcode does not exist you will get Null as return.
Back
Top Bottom