Computer/PHP, ASP
ASP - Rs.GetString() 이용 방법
Gu Youn
2002. 11. 4. 14:43
Dim arrList
if Rs.Eof or Rs.Bof then
arrList = ""
else
arrList = Rs.getString()
end if
if arrList <> "" then
Dim arrRecord, arrColumn, inum
arrRecord = Split(arrList,chr(13))
else
Response.end
end if
'arrRecord(Ubound(arrRecord))에는 마지막 vbCrLf뒤의 널값이 들어가므로 arrColumn으로 나누면 에러남
'예를 들어 Ubound(arrRecord)값이 6이라면 arrRecord(6)은 NULL이므로 arrRecord(0)~arrRecord(5)까지만 사용한다
for inum=0 to Ubound(arrRecord)-1
arrColumn = Split(arrRecord(inum), Chr(9))
next
if Rs.Eof or Rs.Bof then
arrList = ""
else
arrList = Rs.getString()
end if
if arrList <> "" then
Dim arrRecord, arrColumn, inum
arrRecord = Split(arrList,chr(13))
else
Response.end
end if
'arrRecord(Ubound(arrRecord))에는 마지막 vbCrLf뒤의 널값이 들어가므로 arrColumn으로 나누면 에러남
'예를 들어 Ubound(arrRecord)값이 6이라면 arrRecord(6)은 NULL이므로 arrRecord(0)~arrRecord(5)까지만 사용한다
for inum=0 to Ubound(arrRecord)-1
arrColumn = Split(arrRecord(inum), Chr(9))
next