在vfp的程式中建立txt檔案,將vfp評析結果放入txt
建立及刪除txt檔案(vfp)
cScore='d:/score.txt'
if file(cScore)
dele file 'd:/a.txt'
x=FCREATE("d:/score.txt")
=FPUTS(x,alltrim(str(score_all)))
=FCLOSE(x)
else
x=FCREATE("d:/score.txt")
=FPUTS(x,alltrim(str(score_all)))
=FCLOSE(x)
endif
delete file ('d:/score.txt')
/////C#執行exe檔案並且讀取vfp執行的結果
static void Main(string[] args)
{
//將vf做的判卷系統編譯為exe檔案並執行
Process proc = new Process();
proc.StartInfo.FileName = @"C://Users/Administrator/Desktop/test.exe"; //可以用絕對路徑
proc.StartInfo.Arguments = "";
proc.Start();
//proc.Kill();
if (System.IO.File.Exists("D://score.txt"))
{
//C#讀取分數檔案
StreamReader objReader = new StreamReader("d://score.txt");
string sLine = "";
ArrayList arrText = new ArrayList();
while (sLine != null)
{
sLine = objReader.ReadLine();
if (sLine != null)
arrText.Add(sLine);
}
objReader.Close();
//將讀取的結果顯示
string score = "";
foreach (string sOutput in arrText)
score =score+sOutput;
//Console.WriteLine(sOutput);
Console.WriteLine(score);
//Console.ReadLine();
}
}