网站首页  |  业界新闻  |  技术文章  |  视频教程  |  下载频道  |  程序源码  |  个人空间  |  编程论坛
 
学习型 ASP/PHP/ASP.NET 主机 30元/年 全能 ASP/PHP/ASP.NET 主机,支持月付 专业 MSSQL 数据库空间,支持月付 专业 MySQL 数据库空间,支持月付
发新话题
打印

[分享] vb.net做的一套简单的图书管理系统原代码!适合菜鸟学习用

另外你的修改记录的代码建议你仔细的检查sql语句
可以先在sql查询分析器里检查是否能修改.

爱上思考,爱上编程,爱上.net!

TOP

打印是一个空间,你只需要添加窗体就可以了.然后添加控件,再去调用这个窗口

爱上思考,爱上编程,爱上.net!

TOP


我试试

TOP

好拉

TOP

嘿嘿

麻烦帮我看看那个问题啊

就是不能改数据库里记录的那个

TOP

在一个TEXTBOX1.TEXT中输入日期以后通过查询在DATAGRID中显示,可我的怎么显示不出来啊



Dim conn As New SqlConnection
conn.ConnectionString = ConfigurationSettings.AppSettings("aa")
Dim cmd As New SqlCommand
Dim dr As New SqlDataAdapter
Dim ds As New DataSet

conn.Open()
cmd.CommandText = "select u_id as 编号,u_name as 姓名,u_sex as 性别,u_indate as 入学时间,u_zhy as 所学专业,u_dw as 所在单位 from info where u_indate='" & TextBox1.Text & "'"
cmd.Connection = conn
cmd.CommandType = CommandType.Text
dr.SelectCommand = cmd
dr.Fill(ds, "info")
DataGrid1.DataSource = ds.Tables("info")
DataGrid1.DataBind()
conn.Close()

TOP

非常感谢~~
希望也有我会的能贡献大家

TOP

查询后属于重新显示在datagrid控件上.
请在事件的最前方加入对上次查询结果的清空
例如:我输入日期在textbox1.text中,按buttoon1查询,结果显示在datagrid中
代码如下:
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
ds.Clear()
If conn.State = ConnectionState.Closed Then
conn.Open()
End If
cmd.CommandText = "select u_id as 编号,u_name as 姓名,u_sex as 性别,u_indate as 入学时间,u_zhy as 所学专业,u_dw as 所在单位 from info where u_indate='" & TextBox1.Text & "'"
cmd.Connection = conn
cmd.CommandType = CommandType.Text
dr.SelectCommand = cmd
dr.Fill(ds, "info")
DataGrid1.DataSource = ds.Tables("info")
DataGrid1.DataBind()
If conn.State = ConnectionState.Open Then
conn.Close()
End If
end sub

[此贴子已经被作者于2006-5-16 21:28:54编辑过]

爱上思考,爱上编程,爱上.net!

TOP

关于你记录修改的原代码,实在是不好检查,毕竟我没有你的数据库,而你的错误多半的可能属于内部错误,
还是建议你好好检查sql语句是否有错误!!!`
爱上思考,爱上编程,爱上.net!

TOP

好,谢谢啦

TOP

发新话题