云题海 - 专业文章范例文档资料分享平台

当前位置:首页 > 数据库技术及应用课程设计项目设计报告说明书之作业提交系统 - 图文

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

  • 62 次阅读
  • 3 次下载
  • 2025/6/14 7:55:32

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=\ 无标题页

下载文档10.00 元 加入VIP免费下载
推荐下载
本文作者:...

共分享92篇相关文档

文档简介:

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 =

相关推荐

× 游客快捷下载通道(下载后可以自由复制和排版)
单篇付费下载
限时特价:10 元/份 原价:20元
VIP包月下载
特价:29 元/月 原价:99元
低至 0.3 元/份 每月下载150
全站内容免费自由复制
VIP包月下载
特价:29 元/月 原价:99元
低至 0.3 元/份 每月下载150
全站内容免费自由复制
注:下载文档有可能“只有目录或者内容不全”等情况,请下载之前注意辨别,如果您已付费且无法下载或内容有问题,请联系我们协助你处理。
微信:fanwen365 QQ:370150219
Copyright © 云题海 All Rights Reserved. 苏ICP备16052595号-3 网站地图 客服QQ:370150219 邮箱:370150219@qq.com