<%
'on error resume next
dim T1,T2,T3,T4,T5,T6,T7,T8,T9,T10,T11,T12,T13,T14,T15,T16,T17,T18,T19,T20,T21,T22,T23,T24,T25
if request.QueryString("input1")<>"" then
T1=CINT(request.QueryString("input1"))
else
T1=0
end if
if request.QueryString("input2")<>"" then
T2=CINT(request.QueryString("input2"))
else
T2=0
end if
if request.QueryString("input3")<>"" then
T3=CINT(request.QueryString("input3"))
else
T3=0
end if
if request.QueryString("input4")<>"" then
T4=CINT(request.QueryString("input4"))
else
T4=0
end if
if request.QueryString("input5")<>"" then
T5=CINT(request.QueryString("input5"))
else
T5=0
end if
if request.QueryString("input6")<>"" then
T6=CINT(request.QueryString("input6"))
else
T6=0
end if
if request.QueryString("input7")<>"" then
T7=CINT(request.QueryString("input7"))
else
T7=0
end if
if request.QueryString("input8")<>"" then
T8=CINT(request.QueryString("input8"))
else
T8=0
end if
if request.QueryString("input9")<>"" then
T9=CINT(request.QueryString("input9"))
else
T9=0
end if
if request.QueryString("input10")<>"" then
T10=CINT(request.QueryString("input10"))
else
T10=0
end if
if request.QueryString("input11")<>"" then
T11=CINT(request.QueryString("input11"))
else
T11=0
end if
if request.QueryString("input12")<>"" then
T12=CINT(request.QueryString("input12"))
else
T12=0
end if
if request.QueryString("input13")<>"" then
T13=CINT(request.QueryString("input13"))
else
T13=0
end if
if request.QueryString("input14")<>"" then
T14=CINT(request.QueryString("input14"))
else
T14=0
end if
if request.QueryString("input15")<>"" then
T15=CINT(request.QueryString("input15"))
else
T10=0
end if
if request.QueryString("input16")<>"" then
T16=CINT(request.QueryString("input16"))
else
T16=0
end if
if request.QueryString("input17")<>"" then
T17=CINT(request.QueryString("input17"))
else
T17=0
end if
if request.QueryString("input18")<>"" then
T18=CINT(request.QueryString("input18"))
else
T18=0
end if
if request.QueryString("input19")<>"" then
T19=CINT(request.QueryString("input19"))
else
T19=0
end if
if request.QueryString("input20")<>"" then
T20=CINT(request.QueryString("input20"))
else
T20=0
end if
if request.QueryString("input21")<>"" then
T21=CINT(request.QueryString("input21"))
else
T21=0
end if
if request.QueryString("input22")<>"" then
T22=CINT(request.QueryString("input22"))
else
T22=0
end if
if request.QueryString("input23")<>"" then
T23=CINT(request.QueryString("input23"))
else
T23=0
end if
if request.QueryString("input24")<>"" then
T24=CINT(request.QueryString("input24"))
else
T24=0
end if
if request.QueryString("input25")<>"" then
T25=CINT(request.QueryString("input25"))
else
T25=0
end if
T=T1+T2+T3+T4+T5+T6+T7+T8+T9+T10+T11+T12+T13+T14+T15+T16+T17+T18+T19+T20+T21+T22+T23+T24+T25
'T=response.Write(request.QueryString("input1"))+response.Write(request.QueryString("input2"))+response.Write(request.QueryString("input3"))+response.Write(request.QueryString("input4"))+response.Write(request.QueryString("input5"))+response.Write(request.QueryString("input6"))+response.Write(request.QueryString("input7"))+response.Write(request.QueryString("input8"))+response.Write(request.QueryString("input9"))+response.Write(request.QueryString("input10"))
'response.Write(T)
%>
uj5u.com熱心網友回復:
uj5u.com熱心網友回復:
我想知道這個代碼是不是會最后呼叫我做的題的得分,然后25個分值相加。uj5u.com熱心網友回復:
這是VB么。。。從邏輯上來看,25個T會相加的。。
具體結果,就需要你去除錯一下,在T=T1+T2+T3...這里斷點一下,看看25個T有沒有值。
uj5u.com熱心網友回復:
此外。。。看你這個隨意的變數名稱。。。應該不是產品原始碼,是你為了提問寫的Demo?
問題可能在你原始碼的某個角落隱藏,還是建議你一步步斷點查看。
你這個邏輯也不復雜,斷點應該比較好找。。
uj5u.com熱心網友回復:
難道你們公司的程式員按照代碼的行數算錢的么?故意寫出這么多代碼,還是根本就不會寫程式
uj5u.com熱心網友回復:
謝謝各位,我再試試,有不懂的再問各位。uj5u.com熱心網友回復:
這是asp代碼吧。我的天啊,看你這代碼的意思,就是用戶在頁面25個輸入框輸入數值,然后你后臺把這25個輸入值求和。你不能用post提交嗎?你不能把前端25個input 的name定成一樣,然后后臺request.Form("inputname")這樣接收嗎?然后接收到結果是這樣的:1,2,3,"",5,6......,然后你用split用逗號分隔成陣列,然后遍歷陣列求和?(""忽略過去),快改了吧,這樣的代碼以后會坑死你的,要是為50個input求和,你再做25個判斷?
uj5u.com熱心網友回復:
要么dim i,revvalue,total
for i=1 to 25 step 1
revvalue = request.QueryString("input"&Cint(i))
......判斷求和
next
這樣子也好點啊。
uj5u.com熱心網友回復:
uj5u.com熱心網友回復:
秀兒,是你嗎
uj5u.com熱心網友回復:
程式會不會報錯轉載請註明出處,本文鏈接:https://www.uj5u.com/net/28047.html
標籤:ASP.NET
上一篇:Net Core專案 無法進行分頁 資料庫是 SqlServer 2008R的
下一篇:如何爆破美團登錄重重加密驗證
