תחומים - פורום חרדי מקצועי

@aharon-0
זה לא קשור אחד לשני
יש לי קובץ xlsm שלוקח נתונים מ csv

@aharon-0
64

@aharon-0
אני יעשה לך קצת סדר
עם הפאוורשאל לא הסתדרתי
אז עברתי להשתמש ב #C
תכלס יש לי קוד #C שמוריד בהצלחה את כל הקבצים מה FTP
חוץ מזה בניתי קובץ VBS שמפעיל את המאקרו של האקסל
מה שכרגע חסר לי הוא להפעיל את ה VBS דרך ה#C
מקווה שהייתי ברור...

@aharon-0 אמר במחפש קוד של c# להפעלת מאקרו vba:

,אבל יש לי הרגשה שאם תעלה מסמך דרישות למה שאתה מפתח, יהיה יותר קל לעזור לך

כתבתי את זה כאן

@aharon-0
אני לא מפעיל ישירות מה #C את ה vba
אלא מפעיל vbs שמפעיל את ה vba
זה האופציה היחידה כרגע והכי אופציונלית..
עיין כאן

@נ-נח
התקדמות???...
מחזיר פלט כזה אבל לא מריץ את הקובץ

C:\Users\User\source\repos\DownloadDatafromFTP\DownloadDatafromFTP\bin\Debug\netcoreapp3.1\DownloadDatafromFTP.exe (proc
ess 18896) exited with code 0.
Press any key to close this window . . .

@aharon-0
אם היה מדובר ב קוד vba קטן הייתי חושב על המהלך הזה
הנקודה היא שמדובר בקוד באורך של מאות שורות (למעלה מ 1900 )עם כמויות פונקציות וכו'
שזמן ריצה של כל הקוד בממוצע כ 50 שניות במחשב I5 8GR

@נ-נח
מוזר
כתבתי כך

System.Diagnostics.Process.Start(@"wscript //B //Nologo C:\Users\User\Desktop\Barbar\Privimail\UpdatePrivimail.vbs");

וזה לא עוזר
הוא מוציא לי את הפלט הבא

Unhandled exception. System.ComponentModel.Win32Exception (2): The system cannot find the file specified.
   at System.Diagnostics.Process.StartWithCreateProcess(ProcessStartInfo startInfo)
   at System.Diagnostics.Process.Start()
   at System.Diagnostics.Process.Start(ProcessStartInfo startInfo)
   at System.Diagnostics.Process.Start(String fileName)
   at _DownloadDatafromFTP.Program.Main(String[] args) in C:\Users\User\source\repos\DownloadDatafromFTP\DownloadDatafromFTP\Program.cs:line 24

C:\Users\User\source\repos\DownloadDatafromFTP\DownloadDatafromFTP\bin\Debug\netcoreapp3.1\DownloadDatafromFTP.exe (process 19380) exited with code -532462766.
Press any key to close this window . . .

@נ-נח
מספיק השורה הזו?

System.Diagnostics.Process.Start(@"cscript //B //Nologo c:\scripts\vbscript.vbs");

לא צריך איזה קובץ נוסף?

@www אמר בהכסף שמתקבל עבור עסקה בתשלומים:

1 == 3, (1 זה הו"ק עם הגבלת תשלומים).

זה לא אותו הדבר
ב 1 זה תשלום באשראי כל חודש דרך מספר כרטיס... ואם בעל הכרטיס מבטל (תלוי באיזה נסיבות) העמותה לא תקבל את הכסף ותו לא...
משא"כ בהוראת קבע (3) חודשית אם בעל החשבון מבטל והעמותה שולחת חיוב חשבון ויש סירוב העמותה צריכה לשלם סכום כסף כלשהו (אאל"ט 50+ ) לבנק על סירוב הוראת קבע...

@yossiz
סורי קצת על הבורות.. אבל לא הביישן למד...

1. האם אני צריך ליצור קובץ exe נוסף בשם wscript.exe שהוא מפעיל את ה vbs ואני קורא ל wscript.exe מתוך ה #C ?
2. ומה הכוונה להזין את שם הסקריפט כפרמטר?

מצאתי את המאמר הזה
האם זה קשור ואם כן לא כזה הבנתי מה אני צריך לעשות... כלומר איך ליצור את הקובץ?

@chagold
ממה שידוע לי (מתרומות) זה שיש כמה אפשרויות של תשלום

1. תשלומים ללא תפיסת מסגרת שהעמותה מקבלת את הכסף בכל חודש וגם לתורם יורד בכל חודש.
2. תשלומים עם תפיסת מסגרת ששם העמותה מקבלת את כל הכסף בתשלום הראשון ולתורם יורד כל חודש (אבל המסגרת תפוסה)
3. הוראת קבע

כרגע אני מקבל את השגיאה הזו

@נ-נח
הקוד הזה אמור לעבוד על כל סוג קובץ במחשב?

@נ-נח
כן

ניסיתי גם את זה ויש את הקובץ הזה בוודאות
ועם כל זה זה לא עובד

using System.Diagnostics;

namespace MacroRunPrivimail
{ 

    class Program
    {
        static void Main(string[] args)
        {
            Process.Start(@"C:\Users\User\Desktop\YossiBarber1\aass.vbs");
        }
    }
}    

@נ-נח
כתבתי כך

using System.Net;
using System.Diagnostics;
using System.IO;

namespace MacroRunPrivimail
{ 

    class Program
    {
        static void Main(string[] args)
        {
            Process.Start(Directory.GetCurrentDirectory() + @"\Privimail\UpdatePrivimail.vbs");
        }


    }
}   

וכאשר אני מריץ אותו הוא מחזיר שגיאה כזו שאני לא מצליח להבין מהי..

C:\Users\uri\Desktop\Barbar>MacroRunPrivimail.exe
Unhandled exception. System.ComponentModel.Win32Exception (193): The specified executable is not a valid application for this OS platform.
   at System.Diagnostics.Process.StartWithCreateProcess(ProcessStartInfo startInfo)
   at System.Diagnostics.Process.Start()
   at System.Diagnostics.Process.Start(ProcessStartInfo startInfo)
   at System.Diagnostics.Process.Start(String fileName)
   at MacroRunPrivimail.Program.Main(String[] args) in C:\Users\User\source\repos\MacroRunPrivimail\MacroRunPrivimail\Program.cs:line 12

@נ-נח אמר באיך אני מפעיל קובץ במחשב ע"י C#:

@אוריי
אפשר עם process.start

@נ-נח אני די חדש ב #C אשמח אם תוכל לפרט לי יותר ..
תודה רבה

אני רוצה להפעיל קובץ בסיומת vbs שנמצא במחשב במיקום מסויים
איך אני פותח אותו ע"י C# ?....

@yossiz
הרבה תודה ב"ה התקדמתי נחמד ב #C

@yossiz אמר במחפש קוד של c# להפעלת מאקרו vba:

להוסיף Reference בפרוייקט ל-DLL של זה.

אשמח לקבל איזה הסבר קצר איך אני מוסיף את זה

@yossiz
ניסיתי בקוד vba בתוך קובץ vbs וזה עובד הבעיה היא שהוא לא סוגר את האקסל ברקע לאחר הפעולה (כך שלאחר כמה פתיחות השרת לא זז)
א. אני צריך שהבקשה תגיע מקובץ קוד כי זה אמור להגיע לאחר פעולה
ב. אני לא יכול לבקש מתוך אקסס כי א"כ אני מוכרך לפתוח את האקסס בשביל זה והרי אני רוצה שזה יעבוד באופן אוטומטי לחלוטין...
ג. חוץ מזה יש לי קוד c# שעושה לי את הפעולה הקודמת של הורדת קבצים משרת ftp וב"ה עובד מעולה ... כ"כ חיפשתי ג"כ קוד המשך לפעולה הבאה במקום לסרבל את המערכת...

לגבי הניסיונות שלי
אני הכנסתי את הקוד הבא והוא לא מוצא את המחלקה של Excel

   public void WebTest_CodedStep()
    {
        // Object for missing (or optional) arguments.
        object oMissing = System.Reflection.Missing.Value;

        // Create an instance of Microsoft Excel
        Excel.ApplicationClass oExcel = new Excel.ApplicationClass();

        // Make it visible
        oExcel.Visible = true;

        // Define Workbooks
        Excel.Workbooks oBooks = oExcel.Workbooks;
        Excel._Workbook oBook = null;

        // Get the file path
        string path = System.Environment.GetFolderPath(Environment.SpecialFolder.MyDocuments);
        path = path + "\\Worksheet02.csv";

        //Open the file, using the 'path' variable
        oBook = oBooks.Open(path, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing, oMissing,  oMissing, oMissing, oMissing, oMissing, oMissing, oMissing);

        // Run the macro, "First_Macro"
        RunMacro(oExcel, new Object[]{"Worksheet01.xlsm!First_Macro"});

        // Quit Excel and clean up.
        oBook.Close(false, oMissing, oMissing);
        System.Runtime.InteropServices.Marshal.ReleaseComObject (oBook);
        oBook = null;
        System.Runtime.InteropServices.Marshal.ReleaseComObject (oBooks);
        oBooks = null;
        oExcel.Quit();
        System.Runtime.InteropServices.Marshal.ReleaseComObject (oExcel);
        oExcel = null;

        //Garbage collection
        GC.Collect();
    }

    private void RunMacro(object oApp, object[] oRunArgs)
    {
        oApp.GetType().InvokeMember("Run", System.Reflection.BindingFlags.Default | System.Reflection.BindingFlags.InvokeMethod, null, oApp, oRunArgs);
    }

במחשבה שניה לא בטוח שהקוד הזה יסגור לי את האקסל לאחר הפעולה..