asp批量读取和批量输出，求大神。。。

Question

我想实现从1.txt和2.txt里读取Scode和a的值，然后用enCodeY 解密后输出到3.txt里。怎么解决？1.txt和2.txt每行一个值。。。

  Function EnCodeY(sText)
Dim arrCode()
Dim sCode
sCode = "hw9s535xv4elaje"

arrData = split(sText, "-")

cntData = UBOUND(arrData) - 1
cntCode = Len(sCode) - 1

Redim arrCode(cntCode)

For i = 0  To cntCode
arrCode(i) = Mid(sCode, i + 1, 1)
Next

flag = 0
strResult = ""
For i = 0 To cntData
strResult = strResult & CHR(Cint(arrData(i)) XOR ASC(arrCode(flag)))
IF flag = cntCode Then
flag = 0
Else
flag = flag + 1
End IF
Next

EnCodeY = strResult
End Function

a = "89-69-10-94-4-1-6-76-91-5-87-95-85-"
response.write EnCodeY(a)&"<br>"

Answer 1

http://ask.csdn.net/questions/390493
这个结了先，采纳了完点玩写个示例，不就是fso的读写操作而已