2007-12-27 15:33:13 2008.NET情中夜()
求助.....
<frameset rows="80,*" cols="*" frameborder="no" border="0" framespacing="0">
<frame src="Top.aspx" name="topFrame" scrolling="No" noresize="noresize" id="topFrame" title="topFrame" />
<frameset id="mainFrm" cols="190,15,*" frameborder="0" border="0" framespacing="0">
<frame src="Left.aspx" name="leftFrame" scrolling="auto" noresize="noresize" id="leftFrame" title="leftFrame" />
<frame src="Switch.html" scrolling="no" noresize="noresize" id="switchFrame" frameBorder="0" />
<frame src="MainForum.aspx" name="mainFrame" scrolling="auto" id="mainFrame" title="mainFrame" />
</frameset>
</frameset>
怎么才能便在 框架topFrame中 <a></a> 连接后 页面 在 框架 mainFrm 中 显示...
2007-12-27 15:33:53 2008.NET情中夜()
急...急....急...
2007-12-27 15:43:04 ~零亂℃啲愛~()
加我Q
2007-12-27 15:43:19 一叶孤舟()
？
2007-12-27 15:43:25 ~零亂℃啲愛~()
我给你个实例！
2007-12-27 15:43:44 一叶孤舟()
什么实例？
2007-12-27 15:44:10 ~零亂℃啲愛~()
2008.NET情中夜！加我Q
2007-12-27 15:44:26 ~零亂℃啲愛~()
呵呵！
就是他刚那问题啦！
2007-12-27 15:44:49 2008安静()
2008是正式版吗
2007-12-27 15:44:54 一叶孤舟()
哦，俺是新来的，所以……嘿嘿
2007-12-27 15:45:53 纤云()
有谁知道为什么DATAGRID 不能更新
2007-12-27 15:46:50 ~零亂℃啲愛~()
说清楚点？
2007-12-27 15:47:05 2008安静()
2008是正式版吗
2007-12-27 15:47:47 纤云()
Private Sub mydatagrid_UpdateCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles mydatagrid.UpdateCommand
Dim leixing, tihao, timu, xuanxiang1, xuanxiang2, xuanxiang3, xuanxiang4, fenshu, jieda As TextBox
leixing = e.Item.Cells(0).Controls(0)
timu = e.Item.Cells(2).Controls(0)
xuanxiang1 = e.Item.Cells(3).Controls(0)
xuanxiang2 = e.Item.Cells(4).Controls(0)
xuanxiang3 = e.Item.Cells(5).Controls(0)
xuanxiang4 = e.Item.Cells(6).Controls(0)
fenshu = e.Item.Cells(7).Controls(0)
jieda = e.Item.Cells(8).Controls(0)
Dim strsql As String
strsql = "update lesson.SelectedItem.Text set 类型=@类型,题目=@题目,选项1=@选项1,选项2=@选项2,选项3=@选项3,选项4=@选项4,分数=@分数,解答=@解答 where 题号=@题号"
Dim cmd As New OleDbCommand(strsql, conn)
cmd.Parameters.Add(New OleDbParameter("@类型", OleDbType.Char, 50))
cmd.Parameters("@类型").Value = leixing.Text
cmd.Parameters.Add(New OleDbParameter("@题目", OleDbType.Char, 100))
cmd.Parameters("@题目").Value = timu.Text
cmd.Parameters.Add(New OleDbParameter("@选项1", OleDbType.Char, 50))
cmd.Parameters("@选项1").Value = xuanxiang1.Text
cmd.Parameters.Add(New OleDbParameter("@选项2", OleDbType.Char, 50))
cmd.Parameters("@选项2").Value = xuanxiang2.Text
cmd.Parameters.Add(New OleDbParameter("@选项3", OleDbType.Char, 50))
cmd.Parameters("@选项3").Value = xuanxiang3.Text
cmd.Parameters.Add(New OleDbParameter("@选项4", OleDbType.Char, 50))
cmd.Parameters("@选项4").Value = xuanxiang4.Text
cmd.Parameters.Add(New OleDbParameter("@分数", OleDbType.Integer))
cmd.Parameters("@分数").Value = fenshu.Text
cmd.Parameters.Add(New OleDbParameter("@解答", OleDbType.Char, 50))
cmd.Parameters("@解答").Value = jieda.Text
cmd.Parameters.Add(New OleDbParameter("@题号", OleDbType.Integer))
cmd.Parameters("@题号").Value = mydatagrid.DataKeys(CInt(e.Item.ItemIndex))
Dim exp As Exception
Try
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()
Catch exp
message.Text = "发生错误，没有正常更新记录"
End Try
mydatagrid.EditItemIndex = -1
Call binddata()
End Sub
2007-12-27 15:48:35 纤云()
你能不能帮我看一下哪出问题了
2007-12-27 15:49:03 2008小飞侠()
跟踪一下就知道那里错了。
2007-12-27 15:49:11 ~零亂℃啲愛~()
VB
2007-12-27 15:49:55 纤云()
是呀
2007-12-27 15:50:04 2008安静()
08是正式办吗
2007-12-27 15:50:09 2008小飞侠()
是的。
本站官方群聊天记录之一（2007.9.24-2008.3.7）
