qq_26726077的博客

原创 添加 成功 提示

Dim i As Integer = cmd.ExecuteNonQuery()        If (i > 0) Then            Label8.Text = "设置成功！"        Else            Label8.Text = "设置失败，请重新设置！"        End If

原创 绑定access数据库，asp.net 中 以DropDownList为查询条件 ，前台实现数据查询

原创 在前台，以session为查询条件，查询数据库。 seer_name的值就是当前系统的session值。

在前台，以session为查询条件，查询数据库。 seer_name的值就是当前系统的session值。

原创 读取数据库某字段，并在label上显示

Protected Sub Command2_Click() Handles Label3.Load '读取数据库中系统时间表的学年字段        Dim con As OleDbConnection        Dim cmd As OleDbCommand        con = New OleDbConnection("Provider=Microsoft.Jet.OLE

原创 利用label显示当前年月日星期

Protected Sub Command1_Click() Handles Label2.Load        Label2.Text = DateTime.Now.ToString("yyyy年MM月dd日  dddd") '读取系统日期，显示于label中    End Sub