数据库技术及应用课程设计项目设计报告说明书之作业提交系统 - 图文 联系客服

发布时间 : 星期三 文章数据库技术及应用课程设计项目设计报告说明书之作业提交系统 - 图文更新完毕开始阅读8f5abfff0242a8956bece47b

Dim cnn As New SqlConnection '定义一个对象,对象名为cnn,它是一个数据库连接对象。 cnn.ConnectionString = \& Application(\& \作业提交系统\ '给出连接对象的连接信息。 cnn.Open() If cnn.State = ConnectionState.Open Then Dim qq As String qq = \学生信息表 values('\& \ Dim cmd As New SqlCommand '定义对象cmd,是一个SQL数据库的命令对象 cmd.CommandText = qq cmd.Connection = cnn 'cmd使用cnn连接数据库 Dim aaa As Integer aaa = cmd.ExecuteNonQuery() Label1.Text = \已成功添加的记录条数为:\ End If End Sub Protected Sub TextBox2_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox2.TextChanged End Sub Protected Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged End Sub Protected Sub TextBox5_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox5.TextChanged End Sub End Class 删除作业提交表中已有的成绩 <%@ Page Language=\AutoEventWireup=\CodeFile=\Inherits=\ 无标题页

删除成绩
请输入删除成绩:
Imports System.Data Imports System.Data.SqlClient Partial Class delete Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click '将文本框中输入的新系名添加至系别表. Dim cnn As New SqlConnection '定义一个对象,对象名为cnn,它是一个数据库连接对象。 cnn.ConnectionString = \\作业提交系统\给出连接对象的连接信息。 cnn.Open() If cnn.State = ConnectionState.Open Then Dim qq As String qq = \作业提交表 from 作业提交表 where 成绩=('\& TextBox1.Text & \ Dim cmd As New SqlCommand '定义对象cmd,是一个SQL数据库的命令对象 cmd.CommandText = qq cmd.Connection = cnn 'cmd使用cnn连接数据库 Dim aaa As Integer aaa = cmd.ExecuteNonQuery() Label1.Text = \已成功删除的记录条数为:\ End If End Sub Protected Sub TextBox2_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged End Sub End Class 对作业提交表的成绩项进行修改数据 <%@ Page Language=\AutoEventWireup=\CodeFile=\Inherits=\ 无标题页 修改成绩
请输入学生原来成绩:
Imports System.Data Imports System.Data.SqlClient Partial Class update Inherits System.Web.UI.Page Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim cnn As New SqlConnection '定义一个对象,对象名为cnn,它是一个数据库连接对象。 cnn.ConnectionString = \\作业提交系统\给出连接对象的连接信息。 cnn.Open() If cnn.State = ConnectionState.Open Then Dim qq As String qq = \作业提交表 set 成绩='\成绩='\ Dim cmd As New SqlCommand '定义对象cmd,是一个SQL数据库的命令对象 cmd.CommandText = qq cmd.Connection = cnn 'cmd使用cnn连接数据库 Dim aaa As Integer aaa = cmd.ExecuteNonQuery() Label1.Text = \已成功修改的记录条数为:\ End If End Sub End Class 根据学号查询作业提交成绩的相关信息 <%@ Page Language=\AutoEventWireup=\CodeFile=\Inherits=\ 无标题页

Word文档下载:数据库技术及应用课程设计项目设计报告说明书之作业提交系统 -.doc
搜索更多:数据库技术及应用课程设计项目设计报告说明书之作业提交系统 -

最新浏览