到这里来求救哟!!!为什么不可以显示添加时间?
到这里来求救哟!!!为什么不可以显示添加时间?
这个是后台的代码:
Public dataset11 As New DataSet
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Not Page.IsPostBack Then
show()
End If '在此处放置初始化页的用户代码
End Sub
Sub show()
Dim i As Integer
Dim sql As String
Dim cnn As New conn
cnn.con3.Open()
i = Request.QueryString("y")
sql = "select top 1 [title],shijian,[source] ,hit from wenzhang where articleid=" & i
Dim adapter As New OleDbDataAdapter(sql, cnn.con3)
adapter.Fill(dataset11, "wenzhang")
End Sub
这个是前台的代码:
添加时间:<%=cstr(dataset11.Tables(0).Rows(0).Item("shijian"))%>