大橙子网站建设,新征程启航
为企业提供网站建设、域名注册、服务器等服务
点击修改按钮以后,相对的数据显示到 信息显示 窗口的相对TextBox 的代码如下:
创新互联建站专注于龙华企业网站建设,自适应网站建设,商城网站建设。龙华网站建设公司,为龙华等地区提供建站服务。全流程按需求定制网站,专业设计,全程项目跟踪,创新互联建站专业和态度为您提供的服务
1
2
信息显示.TextBox1.Text = DataGridView1.SelectedRows(0).Cells("Name_CN").Value.ToString'中文姓名为例,其他的跟这个一样。
信息显示.ShowDialog()
完成修改的SQL代码如下:
1
UPDATE 表名 SET Name_CN='新值', Name_EN='新值' WHERE 列名=条件
都是用SQL语句完成的
写入数据库
strSQL="INTO TABLENAME (OPTION1,OPTIN2)VALUES(VALUE1,VALUE2)";
cmd.Connection = conn;
cmd.CommandText = strSQL;
cmd.Parameters.Add(paramrs[i]);
try
{
conn.Open();
}
catch(Exception ex)
{
throw ex;
}
finally
{
cmd.Parameters.Clear();
cmd.CommandText = null;
cmd.Dispose();
conn.Close();
}
读取值
strSQL ="SELECT OPTION1,OPTION2 FROM TABLENAME";
cmd.CommandText = strSQL;
cmd.Connection = conn;
DataSet ds = new DataSet();
try
{
conn.Open();
SqlDataAdapter da = new SqlDataAdapter(cmd);
da.Fill(ds);
}
catch (Exception ex)
{
throw ex;
}
finally
{
cmd.Dispose();
conn.Close();
}
TextBox2.text = ds.Tables[0].rows[0][0].value.tostring();
保存数据库最好使用Adodb来编程实现,而不是使用控件来更新。记得将页面显示与数据分立。
参考文章:
这个文章中介绍的AdodbHelper类会帮助你简便的连接数据库,并且执行SQL语句进行数据库更新。
Dim ap As SqlClient.SqlDataAdapter'这个变量很重要
Private Function Save_Data() As Boolean '保存数据库的操作
Try
Me.DataGridView1.EndEdit()
' Me.BindingSource1 = Me.DataGridView1.DataSource
Me.BindingSource1.EndEdit()
Dim bd As New SqlClient.SqlCommandBuilder(ap)
ap.UpdateCommand = bd.GetUpdateCommand
ap.Update(Me.BindingSource1.DataSource)
Find(str_cmd)
Return True
Catch ex As Exception
MsgBox(ex.Message)
Return False
End Try
End Function