https://www.infopathdev.com:443/forums/39.aspxNew to InfoPath? Search to see if your question has already been answered. If it has not, then ask it here or the appropriate topic forum.enCommunityServer 2007 SP3 (Build: 31118.962)https://www.infopathdev.com:443/forums/thread/2734.aspxFri, 14 Jul 2006 21:41:59 GMT033a2e2d-04e2-4a9d-be01-a4634161eefd:2734garym0https://www.infopathdev.com:443/forums/thread/2734.aspxhttps://www.infopathdev.com:443/forums/commentrss.aspx?SectionID=39&PostID=2734I belive you need to modify the following code<br /><br />Dim dr As OleDbDataReader = ocmd.ExecuteReader()<br />thisXDocument.DOM.selectSingleNode("//my:LeaveAvailable").text = strselect<br /><br />to something like this<br /><br />Dim dr As OleDbDataReader = ocmd.ExecuteReader()<br />dr.reader()<br />thisXDocument.DOM.selectSingleNode("//my:LeaveAvailable").text = dr.GetString(0)<br /><br />Hope this helpshttps://www.infopathdev.com:443/forums/thread/1411.aspxWed, 12 Jul 2006 09:13:03 GMT033a2e2d-04e2-4a9d-be01-a4634161eefd:1411Whitley0https://www.infopathdev.com:443/forums/thread/1411.aspxhttps://www.infopathdev.com:443/forums/commentrss.aspx?SectionID=39&PostID=1411hi,<br /><br />I want to retrive the data from access database, but got error message pop out As shown below. <br /><br />System.Data.OleDb.OleDbException<br />No value given for one or more required parameters.<br />at System.Data.OleDb.OleDbCommand.ExecuteCommandTextForSingleResult(tagDBPARAMS dbParams, Object& executeResult)<br />at System.Data.OleDb.OleDbCommand.ExecuteCommandText(Object& executeResult)<br />at System.Data.OleDb.OleDbCommand.ExecuteCommand(CommandBehavior behavior, Object& executeResult)<br />at System.Data.OleDb.OleDbCommand.ExecuteReaderInternal(CommandBehavior behavior, String method)<br />at System.Data.OleDb.OleDbCommand.ExecuteReader(CommandBehavior behavior)<br />at System.Data.OleDb.OleDbCommand.ExecuteReader()<br />at eLeave.eLeave.CTRL_Submit_OnClick(DocActionEvent e)<br />at Microsoft.Office.Interop.InfoPath.SemiTrust._ButtonEventSink_SinkHelper.OnClick(DocActionEvent pEvent)<br /><br /><br /><br />Hope someone can help. this is my coding as shown as below.<br /><br /><br />' The following function handler is created by Microsoft Office InfoPath. Do not<br />' modify the type or number of arguments.<br />&lt;InfoPathEventHandler(MatchPath:="CTRL_Submit", EventType:=InfoPathEventType.OnClick)&gt; _<br /><br />Public Sub CTRL_Submit_OnClick(ByVal e As DocActionEvent)<br /> ' Write your code here.<br /><br />Dim strconnection As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=C:\eLeave.mdb"<br />Dim cn As OleDbConnection = New OleDbConnection(strconnection)<br /><br /><br />Dim strselect As String = "SELECT LeaveBalance " & _<br /> "FROM StaffDetail " & _<br /> "WHERE StaffNo = 3000"<br /><br />Dim ocmd As New OleDbCommand(strselect, cn)<br /><br />cn.Open()<br /><br />Dim dr As OleDbDataReader = ocmd.ExecuteReader()<br />thisXDocument.DOM.selectSingleNode("//my:LeaveAvailable").text = strselect<br /><br />cn.Close()<br /><br />End Sub<br /><br /><br /><br />Please kindly to advise.<br />thanks.