作者Webber520 (計畫=變化)
看板Visual_Basic
標題[.NET] 迴圈的邏輯問題
時間Sun Jan 13 19:18:15 2008
請輸入專案類型(網站專案或者應用程式專案)：
小弟目前打算設計一個動態的網頁 藉由不同的按紐傳出不同的值
讓另一個網頁跑不同的Functioin，不過不知道是自己的邏輯那裡
錯了，值看起來有送出去，可是邏輯確都不跑不到另一段，不過
另外寫了另一頁用來測試送出去值到底有沒有收到，確都沒問題
所以想拜託高手幫我看一下，我的程式哪邊出問題了，值有送出
可是邏輯確都RUN不到另一段，還是我有那邊的設定錯了。謝謝
第一頁 送出值
Private Sub ImageButton1_Click(ByVal sender As System.Object, ByVal e As
System.Web.UI.ImageClickEventArgs) Handles ImageButton1.Click
Dim sline As String
sline = "WT"
Page.RegisterStartupScript("redir",
"<script>window.open('default.aspx?sline=WT');</script>")
End Sub
Private Sub ImageButton2_Click(ByVal sender As System.Object, ByVal e As
System.Web.UI.ImageClickEventArgs) Handles ImageButton2.Click
Dim sline As String = "WP"
Page.RegisterStartupScript("redir",
"<script>window.open('default.aspx?sline=WP');</script>")
End Sub
判斷邏輯頁
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim line As String
SqlConnection1.Open()
SqlConnection2.Open()
Dim sline As String
sline = Request("sline")
If sline = "WP" Then
setStepList()
setOPDLink()
show_key_machine()
show_data12b()
show_move_in_issue()
Else
setStepList()
show_wtdata()
End If
SqlConnection1.Close()
SqlConnection2.Close()
EDN
另外寫的測試頁
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
Dim sline As String
sline = Request("sline")
If sline = "WT" Then
wttest()
Else
wptest()
End If
End Sub
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.131.165.147
1F：推 horngsh:為何不用SESSION傳呢? 01/14 09:18
2F：→ Webber520:用 session真的解決了 謝謝大大 ~ 01/14 23:10