跟踪已输入数据的代码

我有一个表单，我想输入Sr. Nos的machines.it有一个组合框，我必须选择没有保存在另一个表中的发票以及相应的数量的机器。当我输入机器的详细信息时，应该说我是“为第X/Y机器输入Sr no，其中y是在db中保存的总数量，x是sr no。的数量，我已经保存+1 “跟踪已输入数据的代码

它也应该让我保存没有。一些地方..我的意思是在任何变量，以便如果我暂停我的工作之间和之后的话，如果继续它应该说我“为X/Ythth输入详细信息”不是“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

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

来源

2013-04-09 Harabati

只需要使用你的数据库的Identity column，让数据库引擎做创建工作下一个免费号码。

如果你写了一个存储过程来完成插入，你可以return the serial number as an output parameter

来源

2013-04-09 08:07:05

我很抱歉......我没有得到你......请详细... – Harabati 2013-04-09 08:11:22

@Harabati - 阅读中的链接答案 - 他们给你所有的详细说明 – 2013-04-09 08:12:54

感谢您的建议，但我只想在x/th/yth格式.. – Harabati 2013-04-09 11:35:41

跟踪已输入数据的代码

回答

相关问题