一个计算问题请教大家:在线等
<%
Function ReadAllTextFile
Const ForReading = 1, ForWriting = 2
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("f:\wenjian\data3.txt", ForReading)
ReadAllTextFile = f.ReadAll
End Function
c=ReadAllTextFile
Response.Write c
%>
以上读取了文件“data.txt”中的数据,内容是:a=1,b=2(也就是Response.Write 写出的内容)
现在我想利用一下这两个数据计算c,c=a+b
该如何写程序?
Function ReadAllTextFile
Const ForReading = 1, ForWriting = 2
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("f:\wenjian\data3.txt", ForReading)
ReadAllTextFile = f.ReadAll
End Function
c=ReadAllTextFile
Response.Write c
%>
以上读取了文件“data.txt”中的数据,内容是:a=1,b=2(也就是Response.Write 写出的内容)
现在我想利用一下这两个数据计算c,c=a+b
该如何写程序?
...全文
相关推荐
1、在线算法与优化问题:深入解析与实践指南
本文深入探讨了在线算法的核心概念、应用场景及技术细节,包括竞争分析框架、广告拍卖机制、单位覆盖问题的随机化算法、物流配送和云计算中的实际应用,以及数据流处理和在线学习等领域的最新进展。通过具体实例解析,帮助读者全面理解在线算法在解决实时性和不确定性问题中的重要作用。
edp 千1.docx
edp 千1.docx
产业园区运营负责人如何提升园区企业的技术需求对接效率和转化成功率?.docx
产业园区运营负责人如何提升园区企业的技术需求对接效率和转化成功率?
产业园区运营负责人如何提升园区内企业与科研机构的协同创新能力?.docx
产业园区运营负责人如何提升园区内企业与科研机构的协同创新能力?
数字高校智慧校园AI知识库平台规划方案(决策评审版).pptx
数字高校智慧校园AI知识库平台规划方案(决策评审版).pptx



