0

我有一个表格,我想在其中输入机器的 Sr. Nos。它有一个组合框,我必须选择保存在另一个表中的发票以及相应的机器数量。当我输入机器详细信息时,它应该说我为“输入第 X/Y 台机器的 Sr 编号,其中 y 是保存在 db 中的总数量,x 是我保存的 sr 编号+1”

它还应该允许我保存号码。有些地方..我的意思是在任何变量中,所以如果我在单词之间和之后暂停我的工作,如果继续,它应该说我“输入 X'th/Y'th 的详细信息”而不是“1'st/Y'th”

我正在使用这段代码:

Private Sub get_qty()

    Dim qtySql As String = "SELECT * FROM invoice1 where chalan_no='" & cmbChal_no.Text & "'"
    cnnOLEDB.Open()
    Dim cmd As OleDb.OleDbCommand = New OleDb.OleDbCommand(qtySql, cnnOLEDB)

    Dim dr As OleDb.OleDbDataReader = cmd.ExecuteReader

    If dr.Read = True Then
        qnty = dr("qty")
    End If

    cnnOLEDB.Close()

End Sub

Private Sub Srno_enter()

    Dim noSql As String = "SELECT count(sr_no) FROM Vendor_machine GROUP BY(chalan_no) having chalan_no='" & cmbChal_no.Text & "'"
    cnnOLEDB.Open()
    Dim cmd As OleDb.OleDbCommand = New OleDb.OleDbCommand(noSql, cnnOLEDB)

       ' Suggest code retrieve count(sr_no)           <--------------------------

    cnnOLEDB.Close()

End Sub

private sub show()
     lblMachine= 'Result of count(sr_no)' "/" qnty
end sub

请给我建议相同的代码..谢谢..

4

1 回答 1

1

只需在数据库中使用Identity 列,让数据库引擎完成创建下一个空闲号码的工作。

如果您编写了一个存储过程来执行插入,则可以将序列号作为输出参数返回

于 2013-04-09T08:07:05.463 回答