|
29.03.2006, 22:14
#33633736
Ссылка:
Ссылка на сообщение:
Ссылка с названием темы:
Ссылка на профиль пользователя:
|
|
|
Участник
Откуда: Латвия, Рига
Сообщения: 3 725
Рейтинг:
0
/ 0
|
|
|
|
страница с фреймами
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>VideoExamplesPage</title>
</head>
<frameset cols="20%, *" >
<frame name="ddl" src="Default.aspx">
<frame name="content" src="ReadForm.aspx">
</frameset>
</html>
страница с дропдаун
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
<%@ Page Language="VB" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
Protected Sub DropDownList1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs)
Dim csname As String = "SelectValueFromDropDownList1"
Dim cstype As Type = Me.GetType()
Dim cs As ClientScriptManager = Page.ClientScript
If (Not cs.IsStartupScriptRegistered(cstype, csname)) Then
Dim cstext As String = "window.parent.content.location = '/Example/Frames/ReadForm.aspx?ddl=" & HttpUtility.UrlEncode(DropDownList1.SelectedValue) & "'"
cs.RegisterStartupScript(cstype, csname, cstext, True)
End If
End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:DropDownList ID="DropDownList1" runat="server" AutoPostBack="True" OnSelectedIndexChanged="DropDownList1_SelectedIndexChanged">
<asp:ListItem Value="">-----</asp:ListItem>
<asp:ListItem Value="Super Chat">Super Chat</asp:ListItem>
<asp:ListItem Value="Tak Sebe Chat">Tak Sebe Chat</asp:ListItem>
<asp:ListItem Value="Polnij Otstoj">Polnij Otstoj</asp:ListItem>
</asp:DropDownList></div>
</form>
</body>
</html>
собственно вторая страница принимающая значения
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
<%@ Page Language="VB" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<script runat="server">
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
Dim ts As String = HttpUtility.UrlDecode(Request.QueryString("ddl"))
If ts <> "" Then
Response.Write(ts)
Else
Response.Write("Nifiga Ne Vibrano")
End If
End Sub
</script>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
</div>
</form>
</body>
</html>
|
|
|
