mehdi58
سه شنبه 23 مرداد 1386, 18:40 عصر
با سلام
من می خوام یه فایل EXE رو که با پاسکال نوشته شده اجرا کنم . این فایل بعد از اجرا می بایست تعدادی فایل متنی ایجاد کنه . ( حدود 10 تا فایل که در هر کدوم هم حدود 200 تا عدد رو بعد از محاسباتش ثبت می کنه )
این فایل EXE واسه اجرا احتیاج به یه سری مقادیر داره که من اونها رو از طریق یه فایل متنی بهش میدم :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'EXE ایجاد فایل متنی مورد نیاز فایل
Dim sw As StreamWriter = File.CreateText(Application.StartupPath & "\myfile.txt")
For i As Integer = 0 To myArray.Count - 1
sw.WriteLine(myArray(i))
Next
sw.Close()
'EXE اجرای فایل
System.Diagnostics.Process.Start(Application.Start upPath & "\myProgram.exe")
End Sub
وقتی روی Button کلیک می کنم فایل متنی با مقادیرش در مسیر مورد نظر ایجاد می شه و بعد فایل EXE اجرا می شه اما عملکردش درست نیست یعنی اون فایلهای متنی ای رو که می بایست تولید کنه رو ایجاد نمی کنه اما فایل EXE اجرا می شه و برنامه هم هیچ Error ای نمی ده!!!!!!!!!!!
حالا اگه من بیام و بصورت دستی فایل متنی مورد نیاز فایل EXE رو ایجاد کنم و توی برنامه ام از کد زیر استفاده کنم اون وقت با کمال تعجب می بینم که فایل EXE درست اجرا می شه و خروجیهاش هم که تعدادی فایل متنی هستن رو تولید می کنه !!!!
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'EXE اجرای فایل
System.Diagnostics.Process.Start(Application.Start upPath & "\myProgram.exe")
End Sub
به نظر شما چرا تو حالت اول این اتفاق نمی افته ؟؟؟؟ ( با توجه به اینکه در اون حالت من چک کردم و مطمئنم که فایل مورد نیاز واسه اجرای فایل EXE ایجاد می شه )
من می خوام یه فایل EXE رو که با پاسکال نوشته شده اجرا کنم . این فایل بعد از اجرا می بایست تعدادی فایل متنی ایجاد کنه . ( حدود 10 تا فایل که در هر کدوم هم حدود 200 تا عدد رو بعد از محاسباتش ثبت می کنه )
این فایل EXE واسه اجرا احتیاج به یه سری مقادیر داره که من اونها رو از طریق یه فایل متنی بهش میدم :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'EXE ایجاد فایل متنی مورد نیاز فایل
Dim sw As StreamWriter = File.CreateText(Application.StartupPath & "\myfile.txt")
For i As Integer = 0 To myArray.Count - 1
sw.WriteLine(myArray(i))
Next
sw.Close()
'EXE اجرای فایل
System.Diagnostics.Process.Start(Application.Start upPath & "\myProgram.exe")
End Sub
وقتی روی Button کلیک می کنم فایل متنی با مقادیرش در مسیر مورد نظر ایجاد می شه و بعد فایل EXE اجرا می شه اما عملکردش درست نیست یعنی اون فایلهای متنی ای رو که می بایست تولید کنه رو ایجاد نمی کنه اما فایل EXE اجرا می شه و برنامه هم هیچ Error ای نمی ده!!!!!!!!!!!
حالا اگه من بیام و بصورت دستی فایل متنی مورد نیاز فایل EXE رو ایجاد کنم و توی برنامه ام از کد زیر استفاده کنم اون وقت با کمال تعجب می بینم که فایل EXE درست اجرا می شه و خروجیهاش هم که تعدادی فایل متنی هستن رو تولید می کنه !!!!
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'EXE اجرای فایل
System.Diagnostics.Process.Start(Application.Start upPath & "\myProgram.exe")
End Sub
به نظر شما چرا تو حالت اول این اتفاق نمی افته ؟؟؟؟ ( با توجه به اینکه در اون حالت من چک کردم و مطمئنم که فایل مورد نیاز واسه اجرای فایل EXE ایجاد می شه )