使用插入和更新在数据库中传递未填充的值

发布于 2024-10-01 17:36:09 字数 78 浏览 0 评论 0原文

我有一个问题,我可以在数据库中输入一些数据。我可以编码这个东西吗?我使用插入和更新查询...值是双精度型,整数...还有字符串类型.. ...

i has one problem in which i can enter some of a data to the database.Ho can i code this things..i used Insert and update query....the value is type double,integer...and also string.....

如果你对这篇内容有疑问,欢迎到本站社区发帖提问 参与讨论,获取更多帮助,或者扫码二维码加入 Web 技术交流群。

扫码二维码加入Web技术交流群

发布评论

需要 登录 才能够评论, 你可以免费 注册 一个本站的账号。

评论(1

扛刀软妹 2024-10-08 17:36:09

显然,这取决于您使用的数据库类型,但为了便于讨论,让它成为 SQL Express 数据库:

    Dim conn As SqlClient.SqlConnection = New Data.SqlClient.SqlConnection("Server=" & servername & ";Database=" & databasename & ";User ID=" & userid & ";Password=" & password & ";Trusted_Connection=False;")

    Dim sqlstatement As String = "INSERT INTO " & table & "  (ATime,AStringWithLimitedLength,AnInteger,AString)"
    sqlstatement &= " VALUES (@dates,@chars,@ints,@string)"
    Dim comm As New SqlClient.SqlCommand(sqlstatement, conn)
    With comm.Parameters
        .Add("@dates", SqlDbType.DateTime).Value = Me.Timestamp
        .Add("@chars", SqlDbType.VarChar).Value = Me.Type
        .Add("@ints", SqlDbType.Int).Value = Me.UserID
        .Add("@string", SqlDbType.Text).Value = Me.SQL
    End With
    conn.Open()
    comm.ExecuteNonQuery()
    conn.Close()

您可以使用 update 语句执行类似的操作。对于其他数据库类型,请使用 OleDb 而不是 SqlClient。

Obviously it depends on the type of database you are using, but for the sake of argument let it be an SQL Express database:

    Dim conn As SqlClient.SqlConnection = New Data.SqlClient.SqlConnection("Server=" & servername & ";Database=" & databasename & ";User ID=" & userid & ";Password=" & password & ";Trusted_Connection=False;")

    Dim sqlstatement As String = "INSERT INTO " & table & "  (ATime,AStringWithLimitedLength,AnInteger,AString)"
    sqlstatement &= " VALUES (@dates,@chars,@ints,@string)"
    Dim comm As New SqlClient.SqlCommand(sqlstatement, conn)
    With comm.Parameters
        .Add("@dates", SqlDbType.DateTime).Value = Me.Timestamp
        .Add("@chars", SqlDbType.VarChar).Value = Me.Type
        .Add("@ints", SqlDbType.Int).Value = Me.UserID
        .Add("@string", SqlDbType.Text).Value = Me.SQL
    End With
    conn.Open()
    comm.ExecuteNonQuery()
    conn.Close()

You can do something similar with the update statement. For other database types use OleDb instead of SqlClient.

~没有更多了~
我们使用 Cookies 和其他技术来定制您的体验包括您的登录状态等。通过阅读我们的 隐私政策 了解更多相关信息。 单击 接受 或继续使用网站,即表示您同意使用 Cookies 和您的相关数据。
原文