请真正高手帮我看看？？？

[fa791222]

在做update时，如何让程序获取我新输入的值？？

我源程序如下：
<script language="vb" runat="server">
Dim id As Integer = 267
Dim pertime As DateTime = system.datetime.now
//这里是按条件查询出来
Sub Page_load(sender As object,e As Eventargs)
Dim db As SQLExt = New SQLExt()
Dim sql As String = "select * from tabb_customer where id =" & id.tostring()
trace.Write(sql)
Dim dr As OleDbDataReader = db.GetDataReader(sql)
If dr.read() Then
b02.text = dr("b02")
End If
End Sub
//按条件查询出来后执行 update功能。
Sub insert(sender As object,e As Eventargs)
dim aa as string =trim(Request("& b02 &"))
Dim sql As string = "update TAB_CUSTOMER set b02 = '"& b02.text &"' "
sql += "Where id= " & id.tostring()
trace.Write(sql)
Dim db As SQLExt = New SQLExt()
db.extsql(sql)
End sub
</script>

以上的问题是更新不了b02的值。它获取不到新输入的值，当然原来的值还在。
如何获取新的输入值？？？？

[goody9807]

up

[Englishgenius]

把你的代码放在 !Page.IsPostBack里

[luckysusan]

Page_load总是在按钮事件insert之前发生的

你每次都
If dr.read() Then
b02.text = dr("b02")
End If

然后在去更新当然获取不到新输入的值啦!

[panyee]

dim aa as string =trim(Request("& b02 &"))
改成:

dim aa as string
aa = b02.Text

[luckysusan]

Page_load里面这样写:

If Not IsPostBack Then
Dim db As SQLExt = New SQLExt()
Dim sql As String = "select * from tabb_customer where id =" & id.tostring()
trace.Write(sql)
Dim dr As OleDbDataReader = db.GetDataReader(sql)
If dr.read() Then
b02.text = dr("b02")
End If

End If

[付长松_华为云MVP]

<script language="vb" runat="server">
Dim id As Integer = 267
Dim pertime As DateTime = system.datetime.now
//这里是按条件查询出来
Sub Page_load(sender As object,e As Eventargs)
if not page.ispostback then
Dim db As SQLExt = New SQLExt()
Dim sql As String = "select * from tabb_customer where id =" & id.tostring()
trace.Write(sql)
Dim dr As OleDbDataReader = db.GetDataReader(sql)
If dr.read() Then
b02.text = dr("b02")
End If
end if
End Sub
//按条件查询出来后执行 update功能。
Sub insert(sender As object,e As Eventargs)
dim aa as string =trim(Request("& b02 &"))
Dim sql As string = "update TAB_CUSTOMER set b02 = '"& b02.text &"' "
sql += "Where id= " & id.tostring()
trace.Write(sql)
Dim db As SQLExt = New SQLExt()
db.extsql(sql)
End sub
</script>

[fa791222]

以上有两个sub，如果执行完第一个马上退出，第二个我以后在执行如何办？

[付长松_华为云MVP]

执行的时候,第二个SUB是不执行的,只有你在page_load中调用它才会执行!

[fa791222]

哦好象可以了。/先谢谢先！！！


待会加分！！！