Search results

  1. M

    Syntax Error using IF in SELECT Statement

    Hi, the function is IIF
  2. M

    Connecting Data

    Hi, First, I'm not sour i've quite understud your question. What do you see insted of Last Movement Date? Beside that, what date do you expect to receive from the expression Now() - Last Movement Date? result you should expected to nuber of days between these dates. ATB
  3. M

    prevent duplication in table

    Hi, No, it is not possible for a table, it is possible for a query, a 'Delete' query. Find here http://www.techonthenet.com/access/queries/index.php in 'basic' section how to create and run one.
  4. M

    DoCmd.TransferSpreadsheet error

    Glad I could help :)
  5. M

    Hello every one

    Hi, Most important! Have a FE on each work-station. If FE is simultaneously opened from the network by more than one user, it may cause file corruption.
  6. M

    DoCmd.TransferSpreadsheet error

    Hi, A web system doesn't use an Excel - COM object to create an excel file, it 'mocks' one, knowing the desired structure. When you have Excel open and save the file, it is recreated by Excel - COM object. this code I've pasted here actually works on a product, with the same problem: bank...
  7. M

    Access Auto dialler VBA

    Yup, I guess its time to learn HTTP and use it in Access. Its Quite a few year they say in the future, time to enter it! guis here lined some nice code :) Thanks for your advice!
  8. M

    Access Auto dialler VBA

    Hi, Back from weekend... :) VBAInet, just went through entire code repository, couldn't find... I'me locking some API for directly accessing my land-phone company, and sending SMS on my simple prepaid line. any ideas pls? TIA
  9. M

    DoCmd.TransferSpreadsheet error

    Here is code I once wrote for this: 'Must have a reference to Microsoft excel 11.0 object library ' (Tools->Refernces->Microsoft excel 11.0 object library ) Private Sub ConvertExcel(strFilePath As String, Optional strSheetName As String = "") On Error GoTo Err_ConvertExcel Dim...
  10. M

    DoCmd.TransferSpreadsheet error

    Well, I tested it, it doesn't work. Sorry... I opened the Excel and saved it ("Save AS") in that same format (xls 2003), and it worked! I've seen that before with Excel files coming from the internet. Before running TransferSpreadsheet(), use Excel.Application object to open the Excel WorkBook...
  11. M

    DoCmd.TransferSpreadsheet error

    Hi, Do you want to be more specific, what doesn't work? Could you paste here the line of code?
  12. M

    Access Auto dialler VBA

    Hi, If we are here, does anyone know of a way to send an SMS in Access? That is providing a connected modem ("telephone jack").
  13. M

    DoCmd.TransferSpreadsheet error

    Hi, I've found Excel has some kind of default definition of the range containing the data. It is not definitely accurate, I've sometimes received additional field F1 to F20! ... Use the [Range] parameter to define the range you need to import, in your code it is the next one after...
  14. M

    Importing very large text file

    Hi, to the best of my knowledge, Access DB, or even more: Access table, is limited in the size of data it can contain and manage. Are you sure you'r not beyond this limit? I'm not sure your not.
  15. M

    Close form without saving record

    Hi, Have you found this in Forms, or in controls? where is Cancel defined? I think if you want to not save a record, you shouldn't use a bound form, rather write logic inserting or updating the DB. But then, why do it in Access... An other way could be Deleting the current record, if you...
  16. M

    Help needed with constructing query

    Here you can read about table joining: http://www.sqlcourse2.com/joins.html And here about how you do it in Access: http://www.techonthenet.com/access/queries/joins1.php serf these sites about SQL and Access, they are great! ATB
  17. M

    Sum of Digits in a string

    Hi, You can send Total to SumDigits() above: Mid() Function returns a section from a middle of a string, in our case: a section containing 1 character. Cint() converts this digit into a numeric value, with is summed up into SumDigits. The above action is done for each character in Total, and...
  18. M

    Sum of Digits in a string

    Hi, May I have a try...? Public Function SumDigits(varInput As String) As Long Dim x As Integer For x = 1 To Len(varInput) if isNumeric(Mid(varInput, x, 1)) Then SumDigits= SumDigits + Cint( Mid(varInput, x, 1)) End If Next x End Function
  19. M

    Need a query to find records that contains "No"

    VBA? dim strSQL as String, rst as Dao.RecordSet, fld as Dao.Field StrSQL = "SELECT * FROM tblName WHERE " Set rst = CurrentDB.OpenRecordSet("tblName") for each fld in rst.Fields strSQL = strSQL & "[" & fld.Name & "] = 'No' Or " Next FLD strSQL = Left(strSQL, Len(strSQL )-3)' remove last "Or...
  20. M

    docmd.runSQL code help - INSERT INTO with multiple WHERE clauses

    Hi Jeff, Was I of any help? Was I understood?...
Back
Top Bottom