473,322 Members | 1,734 Online
Bytes | Software Development & Data Engineering Community
Post Job

Home Posts Topics Members FAQ

Join Bytes to post your question to a community of 473,322 software developers and data experts.

Code Worked as Macro but not completely as VBA

106 64KB
Expand|Select|Wrap|Line Numbers
  1. '------------------------------------------------------------
  2. ' Open_Control_Plan_Final_Output_to__Bruce_
  3. '
  4. '------------------------------------------------------------
  5. Function Open_Control_Plan_Final_Output_to__Bruce_()
  6. 'On Error GoTo Open_Control_Plan_Final_Output_to__Bruce__Err
  7.  
  8.     With CodeContextObject
  9.         If (.Part = "ZZStop") Then
  10.             DoCmd.RunMacro "Rename Back", , ""
  11.         End If
  12.         If (.Part = "ZZStop") Then
  13.             DoCmd.Quit acSave
  14.         End If
  15.         If (.Obsolete = True) Then
  16.             DoCmd.OpenReport "Inactive Report", acViewPreview, "", "", acNormal
  17.             DoCmd.OutputTo acOutputReport, "Inactive Report", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output], False, "", , acExportQualityPrint
  18.             SendKeys "y", True
  19.             DoCmd.OutputTo acOutputReport, "Inactive Report", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output FMEA], False, "", , acExportQualityPrint
  20.             SendKeys "y", True
  21.             DoCmd.OutputTo acOutputReport, "Inactive Report", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output PF], False, "", , acExportQualityPrint
  22.             SendKeys "y", True
  23.             DoCmd.Close acReport, "Inactive Report"
  24.             DoCmd.GoToRecord acForm, "Web Bruce", acNext
  25.             Exit Function
  26.         End If
  27.         If (.Obsolete = False And .[DCP Format] = False) Then
  28.             DoCmd.OpenReport "Final Control Plan", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  29.             DoCmd.OutputTo acOutputReport, "Final Control Plan", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output], False, "", , acExportQualityPrint
  30.             SendKeys "y", False
  31.             DoCmd.Close acReport, "Final Control Plan"
  32.             DoCmd.OpenReport "FMEA", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  33.             DoCmd.OutputTo acOutputReport, "FMEA", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output FMEA], False, "", , acExportQualityPrint
  34.             SendKeys "y", False
  35.             DoCmd.Close acReport, "FMEA"
  36.             DoCmd.OpenReport "Process Flow Chart", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  37.             DoCmd.OutputTo acOutputReport, "Process Flow Chart", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output PF], False, "", , acExportQualityPrint
  38.             SendKeys "y", False
  39.             DoCmd.Close acReport, "Process Flow Chart"
  40.             DoCmd.GoToRecord acForm, "Web Bruce", acNext
  41.             Exit Function
  42.         End If
  43.         If (.Obsolete = False And .[DCP Format] = True) Then
  44.             DoCmd.OpenReport "Final Control Plan", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  45.             DoCmd.OutputTo acOutputReport, "Final Control Plan", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output], False, "", , acExportQualityPrint
  46.             SendKeys "y", True
  47.             DoCmd.Close acReport, "Final Control Plan"
  48.             DoCmd.OpenReport "FMEA", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  49.             DoCmd.OutputTo acOutputReport, "FMEA", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output FMEA], False, "", , acExportQualityPrint
  50.             SendKeys "y", False
  51.             DoCmd.Close acReport, "FMEA"
  52.             DoCmd.OpenReport "Process Flow Chart", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  53.             DoCmd.OutputTo acOutputReport, "Process Flow Chart", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output PF], False, "", , acExportQualityPrint
  54.             SendKeys "y", False
  55.             DoCmd.Close acReport, "Process Flow Chart"
  56.             DoCmd.GoToRecord acForm, "Web Bruce", acNext
  57.             Exit Function
  58.         End If
  59.     End With
  60.  
  61. 'Open_Control_Plan_Final_Output_to__Bruce__Exit:
  62.    ' Exit Function
  63.  
  64.  
  65. 'Open_Control_Plan_Final_Output_to__Bruce__Err:
  66.    ' MsgBox Error$
  67.     'Resume Open_Control_Plan_Final_Output_to__Bruce__Exit
  68.  
  69. End Function
Code works except for it only runs once. I need it to run until all reports for all records are updated, so I think I need to do some sort of loop but not sure how. This was a macro made for this database by someone else and I'm taking over the development of it, everything work as a macro except the sendkeys. I would get a pop up message asking if I wanted to overwrite a file already there, which I always do, but it would not send it for the pop up like it was supposed to.

Thanks in advance for any help.
Jun 10 '16 #1
6 1265
zmbd
5,501 Expert Mod 4TB
Which version of Access/Office are you using?

SendKeys have always had glitches, the foremost being the fact that the keystroke is sent to the object having the focus and there's very little one can do to assure that the correct object has the focus.

If you do not want to save the file, then use the standard Kill Statement to remove the old file first then create your new file.
WORD OF CAUTION HERE - the Kill Statement is an immediate action, there is no prompt, there are no undos, there is no recovery. The file is "burned."

As for a loop... let us take a quick look here... it takes a few moments to wade thru code. :)
Jun 12 '16 #2
zmbd
5,501 Expert Mod 4TB
I need to clarify a few things:
1) The original script was Access-Macro, NOT Access-VBA - is this correct?
- this is important because VBA script is Not Macro script in Access.

2)
This was a macro made for this database by someone...
Does the original Macro version loop thru all of your reports during record updates?

((2A)) How are these updates being performed? - this might be where the loop should be issued

((2B)) Can we see the original macro script too?
In Access2010 and newer you can open the macro in design view, select any item therein, <ctrl><a> to select all actions, <ctrl><c>, to copy the macro actions as an XML script to the clipboard.

Once you have the actions copied to the clipboard, come back here, in the post reply, <ctrl><v>

Select the entire pasted XML script and then click on the [CODE/] format tool in the post-box-toolbar.

3) If you are updating several records, then the way this script is written, you are going to overwrite the previous file version during each loop unless something in form "Forms![Web Bruce] " referenced control is being set to a new file name. Are you really sure that this is the desired behavior? If you are updating a single record that's one thing; however, if you are looking several records then you may want to rethink when you call the report - logically, it would seem better to call the report after all of the updates are made; however, you have several reports and conditions being tested (a SELECT-CASE construct might be better - or do you need to test for all three conditions (lines 15,27,43) each time?)

4) CodeContextObject is an unusual method of referencing an object... is this code being called by more than one form or form-control?


<> Lines 9 thru 14 can be combined into one logic block
Expand|Select|Wrap|Line Numbers
  1.    If (.Part = "ZZStop") Then
  2.       DoCmd.RunMacro "Rename Back", , ""
  3.       DoCmd.Quit acSave
  4.    End If
Jun 12 '16 #3
DJRhino
106 64KB
I'm using Access 2013. I just want it to overwrite the file. I converted a macro into VBA using the convert macro to VBA button. To perform this action I click a button on a form.


Expand|Select|Wrap|Line Numbers
  1. <?xml version="1.0" encoding="UTF-16" standalone="no"?>
  2. <UserInterfaceMacros xmlns="http://schemas.microsoft.com/office/accessservices/2009/11/application"><UserInterfaceMacro MinimumClientDesignVersion="14.0.0000.0000"><Statements><ConditionalBlock><If><Condition>[Part]="ZZStop"</Condition><Statements><Action Name="RunMacro"><Argument Name="MacroName">Rename Back</Argument></Action></Statements></If></ConditionalBlock><ConditionalBlock><If><Condition>[Part]="ZZStop"</Condition><Statements><Action Name="QuitAccess"/></Statements></If></ConditionalBlock><ConditionalBlock><If><Condition>[Obsolete]=Yes</Condition><Statements><Action Name="OpenReport"><Argument Name="ReportName">Inactive Report</Argument><Argument Name="View">Print Preview</Argument></Action><Action Name="ExportWithFormatting"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Inactive Report</Argument><Argument Name="OutputFormat">PDFFormat(*.pdf)</Argument><Argument Name="OutputFile">=[Forms]![Web Bruce]![Web Output]</Argument></Action><Action Name="SendKeys"><Argument Name="Keystrokes">y</Argument><Argument Name="Wait">Yes</Argument></Action><Action Name="ExportWithFormatting"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Inactive Report</Argument><Argument Name="OutputFormat">PDFFormat(*.pdf)</Argument><Argument Name="OutputFile">=[Forms]![Web Bruce]![Web Output FMEA]</Argument></Action><Action Name="SendKeys"><Argument Name="Keystrokes">y</Argument><Argument Name="Wait">Yes</Argument></Action><Action Name="ExportWithFormatting"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Inactive Report</Argument><Argument Name="OutputFormat">PDFFormat(*.pdf)</Argument><Argument Name="OutputFile">=[Forms]![Web Bruce]![Web Output PF]</Argument></Action><Action Name="SendKeys"><Argument Name="Keystrokes">y</Argument><Argument Name="Wait">Yes</Argument></Action><Action Name="CloseWindow"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Inactive Report</Argument></Action><Action Name="GoToRecord"><Argument Name="ObjectType">Form</Argument><Argument Name="ObjectName">Web Bruce</Argument></Action><Action Name="StopMacro"/></Statements></If></ConditionalBlock><ConditionalBlock><If><Condition>[Obsolete]=No And [DCP Format]=No</Condition><Statements><Action Name="OpenReport"><Argument Name="ReportName">Final Control Plan</Argument><Argument Name="View">Print Preview</Argument><Argument Name="WhereCondition">[Part Number]=[Forms]![Web Bruce]![Part]</Argument></Action><Action Name="ExportWithFormatting"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Final Control Plan</Argument><Argument Name="OutputFormat">PDFFormat(*.pdf)</Argument><Argument Name="OutputFile">=[Forms]![Web Bruce]![Web Output]</Argument></Action><Action Name="SendKeys"><Argument Name="Keystrokes">y</Argument></Action><Action Name="CloseWindow"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Final Control Plan</Argument></Action><Action Name="OpenReport"><Argument Name="ReportName">FMEA</Argument><Argument Name="View">Print Preview</Argument><Argument Name="WhereCondition">[Part Number]=[Forms]![Web Bruce]![Part]</Argument></Action><Action Name="ExportWithFormatting"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">FMEA</Argument><Argument Name="OutputFormat">PDFFormat(*.pdf)</Argument><Argument Name="OutputFile">=[Forms]![Web Bruce]![Web Output FMEA]</Argument></Action><Action Name="SendKeys"><Argument Name="Keystrokes">y</Argument></Action><Action Name="CloseWindow"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">FMEA</Argument></Action><Action Name="OpenReport"><Argument Name="ReportName">Process Flow Chart</Argument><Argument Name="View">Print Preview</Argument><Argument Name="WhereCondition">[Part Number]=[Forms]![Web Bruce]![Part]</Argument></Action><Action Name="ExportWithFormatting"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Process Flow Chart</Argument><Argument Name="OutputFormat">PDFFormat(*.pdf)</Argument><Argument Name="OutputFile">=[Forms]![Web Bruce]![Web Output PF]</Argument></Action><Action Name="SendKeys"><Argument Name="Keystrokes">y</Argument></Action><Action Name="CloseWindow"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Process Flow Chart</Argument></Action><Action Name="GoToRecord"><Argument Name="ObjectType">Form</Argument><Argument Name="ObjectName">Web Bruce</Argument></Action><Action Name="StopMacro"/></Statements></If></ConditionalBlock><ConditionalBlock><If><Condition>[Obsolete]=No And [DCP Format]=Yes</Condition><Statements><Action Name="OpenReport"><Argument Name="ReportName">Final Control Plan</Argument><Argument Name="View">Print Preview</Argument><Argument Name="WhereCondition">[Part Number]=[Forms]![Web Bruce]![Part]</Argument></Action><Action Name="ExportWithFormatting"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Final Control Plan</Argument><Argument Name="OutputFormat">PDFFormat(*.pdf)</Argument><Argument Name="OutputFile">=[Forms]![Web Bruce]![Web Output]</Argument></Action><Action Name="SendKeys"><Argument Name="Keystrokes">y</Argument><Argument Name="Wait">Yes</Argument></Action><Action Name="CloseWindow"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Final Control Plan</Argument></Action><Action Name="OpenReport"><Argument Name="ReportName">FMEA</Argument><Argument Name="View">Print Preview</Argument><Argument Name="WhereCondition">[Part Number]=[Forms]![Web Bruce]![Part]</Argument></Action><Action Name="ExportWithFormatting"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">FMEA</Argument><Argument Name="OutputFormat">PDFFormat(*.pdf)</Argument><Argument Name="OutputFile">=[Forms]![Web Bruce]![Web Output FMEA]</Argument></Action><Action Name="SendKeys"><Argument Name="Keystrokes">y</Argument></Action><Action Name="CloseWindow"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">FMEA</Argument></Action><Action Name="OpenReport"><Argument Name="ReportName">Process Flow Chart</Argument><Argument Name="View">Print Preview</Argument><Argument Name="WhereCondition">[Part Number]=[Forms]![Web Bruce]![Part]</Argument></Action><Action Name="ExportWithFormatting"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Process Flow Chart</Argument><Argument Name="OutputFormat">PDFFormat(*.pdf)</Argument><Argument Name="OutputFile">=[Forms]![Web Bruce]![Web Output PF]</Argument></Action><Action Name="SendKeys"><Argument Name="Keystrokes">y</Argument></Action><Action Name="CloseWindow"><Argument Name="ObjectType">Report</Argument><Argument Name="ObjectName">Process Flow Chart</Argument></Action><Action Name="GoToRecord"><Argument Name="ObjectType">Form</Argument><Argument Name="ObjectName">Web Bruce</Argument></Action><Action Name="StopMacro"/></Statements></If></ConditionalBlock></Statements></UserInterfaceMacro></UserInterfaceMacros>
  3.  
The records at this point will already be up to date. Then I need to export the reports to a specific location so they can be viewed when needed. Its fine if they get overwritten all we want is the latest version.
I'm an extreme novice when it comes to VBA, that's why I converted the macro when I couldn't get the sendkeys to work. It just seems that I need this code to loop through until all records have been gone through.

Hope this sheds a little light on what I need.
Jun 13 '16 #4
DJRhino
106 64KB
After a little more research and trial and error I got it.

Here is the code:

Expand|Select|Wrap|Line Numbers
  1. '------------------------------------------------------------
  2. ' Open_Control_Plan_Final_Output_to__Bruce_
  3. '------------------------------------------------------------
  4. Function Open_Control_Plan_Final_Output_to__Bruce_()
  5.  
  6.     Dim strSQL As String
  7.     Dim rs As DAO.Recordset
  8.  
  9.     strSQL = "Instructions1Update"
  10.     Set rs = CurrentDb.OpenRecordset(strSQL)
  11.  
  12.     On Error GoTo Proc_err
  13.  
  14.     With rs
  15.         If Not .BOF And Not .EOF Then
  16.             .MoveLast
  17.             .MoveFirst
  18.  
  19.     While (Not .EOF)
  20.  
  21.     With CodeContextObject
  22.         If (.Part = "ZZStop") Then
  23.             DoCmd.RunMacro "Rename Back", , ""
  24.         End If
  25.         If (.Part = "ZZStop") Then
  26.             DoCmd.Quit acSave
  27.         End If
  28.  
  29.         If (.Obsolete = True) Then
  30.             DoCmd.OpenReport "Inactive Report", acViewPreview, "", "", acNormal
  31.             DoCmd.OutputTo acOutputReport, "Inactive Report", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output], False, "", , acExportQualityPrint
  32.             SendKeys "y", True
  33.             DoCmd.OutputTo acOutputReport, "Inactive Report", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output FMEA], False, "", , acExportQualityPrint
  34.             SendKeys "y", True
  35.             DoCmd.OutputTo acOutputReport, "Inactive Report", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output PF], False, "", , acExportQualityPrint
  36.             SendKeys "y", True
  37.             DoCmd.Close acReport, "Inactive Report"
  38.             DoCmd.GoToRecord acForm, "Web Bruce", acNext
  39.             Exit Function
  40.         End If
  41.         If (.Obsolete = False And .[DCP Format] = False) Then
  42.             DoCmd.OpenReport "Final Control Plan", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  43.             DoCmd.OutputTo acOutputReport, "Final Control Plan", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output], False, "", , acExportQualityPrint
  44.             SendKeys "y", False
  45.             DoCmd.Close acReport, "Final Control Plan"
  46.             DoCmd.OpenReport "FMEA", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  47.             DoCmd.OutputTo acOutputReport, "FMEA", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output FMEA], False, "", , acExportQualityPrint
  48.             SendKeys "y", False
  49.             DoCmd.Close acReport, "FMEA"
  50.             DoCmd.OpenReport "Process Flow Chart", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  51.             DoCmd.OutputTo acOutputReport, "Process Flow Chart", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output PF], False, "", , acExportQualityPrint
  52.             SendKeys "y", False
  53.             DoCmd.Close acReport, "Process Flow Chart"
  54.             DoCmd.GoToRecord acForm, "Web Bruce", acNext
  55.             Exit Function
  56.         End If
  57.         If (.Obsolete = False And .[DCP Format] = True) Then
  58.             DoCmd.OpenReport "Final Control Plan", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  59.             DoCmd.OutputTo acOutputReport, "Final Control Plan", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output], False, "", , acExportQualityPrint
  60.             SendKeys "y", True
  61.             DoCmd.Close acReport, "Final Control Plan"
  62.             DoCmd.OpenReport "FMEA", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  63.             DoCmd.OutputTo acOutputReport, "FMEA", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output FMEA], False, "", , acExportQualityPrint
  64.             SendKeys "y", False
  65.             DoCmd.Close acReport, "FMEA"
  66.             DoCmd.OpenReport "Process Flow Chart", acViewPreview, "", "[Part Number]=[Forms]![Web Bruce]![Part]", acNormal
  67.             DoCmd.OutputTo acOutputReport, "Process Flow Chart", "PDFFormat(*.pdf)", Forms![Web Bruce]![Web Output PF], False, "", , acExportQualityPrint
  68.             SendKeys "y", False
  69.             DoCmd.Close acReport, "Process Flow Chart"
  70.             DoCmd.GoToRecord acForm, "Web Bruce", acNext
  71.             Exit Function
  72.         End If
  73.     End With
  74.          .MoveNext
  75.  
  76.          Wend
  77.  
  78.     End If
  79.  
  80.          .Close
  81. End With
  82. exitsub:
  83.     Set rs = Nothing
  84. Exit Function
  85.  
  86. Proc_err:
  87.    Resume Next
  88.  
  89. End Function
  90.  
Thanks for the help.
Jun 16 '16 #5
zmbd
5,501 Expert Mod 4TB
be careful with the send keys function, it is not the most reliable.
I still recommend that you check for the existence of the old file ( Allen Browne FileExists() and FolderExists() functions ), delete if found ( Kill Statement ) then create your new file.
Jun 17 '16 #6
DJRhino
106 64KB
Still trying to find a good sendkeys replacement that I can understand. As far as overwritting the file on hand, that is exactly wha twe want to do. The info. on the Database is the controlled data that gets updated, so we export the reports out so everyone can access them quickly on out intranet site. If you have a good sendkeys replacement I would love to see it, and to tell me where in my code I would put it. This way I should be able to use my PC while everything exports.

Thanks again.
Jun 17 '16 #7

Sign in to post your reply or Sign up for a free account.

Similar topics

3
by: WØCBF | last post by:
I know this code has worked before but now appears to get a compile error. The code it seems to choke on line 12. I receive the following message and it highlights the "rst!" statement. Error...
1
by: Chad Dalton | last post by:
The code worked perfectly fine in VB6 for converting a decimal length to binary hex, but in .NET it only works when the iNum variable doesn't contain a zero. If zero is passed in then I lose...
1
by: _R | last post by:
I'm working on a project that entails calling into a legacy C DLL. The original unmanaged test code (ancient C++) works OK, but after generating managed C++ shells for calling the DLL via C#,...
6
by: Gary Paris | last post by:
Cor, I made the changes you suggested by I get an error message saying "Incorrect syntax near the keyword 'trigger'. What is wrong? ------------------------------ Last message from...
16
by: vashwath | last post by:
Hi all, Below macro moves specified number of bytes from a specified index of source string to a specified index of destination string. #define STRMOV(src_str,src_ind,length,dst_str,dst_ind)\...
11
by: nevergone | last post by:
Hello Everybody In <<Modern C++ Design>Compile-Time Assertions there is : template <boolstruct CompileTimeChecker { CompileTimeChecker(...); }; template <struct CompileTimeChecker<false{ };
8
by: Radu | last post by:
Hi. This code worked fine with SQL2005, but has a problem with SQL2000.... Which one ???? cnSQL = New SqlConnection(System.Configuration.ConfigurationManager.AppSettings("ConnectionString"))...
5
by: solargovind | last post by:
Hi, In VBA code, How can i run Sql query..? I need to delete a record by the below query... Docmd.runsql(Delete * from Payment_detail_Table where Payment_id=(Select Max(Payment_id) from...
0
by: rednek | last post by:
Parameter QueryDef Code below worked well in Access97 but won't open a Dynaset in AccessXP (2002). I've referenced the DAO 3.6 Library in VB and added the SP6. The params get loaded OK but the...
2
by: Yolly | last post by:
i have an access database that needs a macro timer to close down the database automatically.run every night. I don't know how to code this macro timer in VBA. Please help! Yolly
0
by: DolphinDB | last post by:
Tired of spending countless mintues downsampling your data? Look no further! In this article, you’ll learn how to efficiently downsample 6.48 billion high-frequency records to 61 million...
0
by: ryjfgjl | last post by:
ExcelToDatabase: batch import excel into database automatically...
0
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
1
isladogs
by: isladogs | last post by:
The next Access Europe meeting will be on Wednesday 6 Mar 2024 starting at 18:00 UK time (6PM UTC) and finishing at about 19:15 (7.15PM). In this month's session, we are pleased to welcome back...
0
by: Vimpel783 | last post by:
Hello! Guys, I found this code on the Internet, but I need to modify it a little. It works well, the problem is this: Data is sent from only one cell, in this case B5, but it is necessary that data...
0
by: jfyes | last post by:
As a hardware engineer, after seeing that CEIWEI recently released a new tool for Modbus RTU Over TCP/UDP filtering and monitoring, I actively went to its official website to take a look. It turned...
1
by: CloudSolutions | last post by:
Introduction: For many beginners and individual users, requiring a credit card and email registration may pose a barrier when starting to use cloud servers. However, some cloud server providers now...
1
by: Shællîpôpï 09 | last post by:
If u are using a keypad phone, how do u turn on JavaScript, to access features like WhatsApp, Facebook, Instagram....
0
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 3 Apr 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome former...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.