行 4:
行 5: Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
行 6: Me.Title = CType(FormView1.FindControl("stittleLabel"), Label).Text
行 7: Dim ads As New AccessDataSource("~/mydo.mdb", "")
行 8: ads.UpdateCommand = "UPDATE [PICS] SET 次數 = 次數 + 1 WHERE [編號]= ?"
|