Browser Forms

Re: Trouble with creating error messages when a query fails to return the data to the infopath form

g21cincy — Fri, 25 Feb 2011 17:17:59 GMT

I hope this helps you out.

Dim Nav As XPathNavigator = Me.CreateNavigator()

' Set the data connection for the query

Dim Query As AdoQueryConnection = Me.DataConnections("Data Source Qry")

' This part is where the query is done to see if the Id_number exists

Query.Command = "SELECT Id_number FROM MedForms.dbo.tblTable WHERE Id_number = '" & GetValue("XPath", Nav) & "'"

Query.Execute()

Dim IDNumberNav As XPathNavigator = Me.DataSources("Data Source Qry").CreateNavigator()

Dim IDNums As XPathNodeIterator = HospitalAcctNav.Select("/dfs:myFields/dfs:dataFields/d:tblTable", Me.NamespaceManager)

' If there are no matches for the Id_number then an error is thrown which will have a red dotted line around the text box being queried and say "Invalid ID Number"

If IDNums.Count = 0 Then

Dim HospitalAcctInput As XPathNavigator = Me.CreateNavigator().SelectSingleNode("/dfs:myFields/dfs:queryFields/q:tblTable/@ID_Number", Me.NamespaceManager)

Me.Errors.Add(HospitalAcctInput, "Error", "Invalid ID Number")

Else

' Run query using Data Source

End If

Return

End If

Re: Trouble with creating error messages when a query fails to return the data to the infopath form

radhikakumaran3 — Wed, 23 Feb 2011 05:13:49 GMT

Thanks a lot g21cincy...

But u will be dismayed to know that I have absolutely no idea about coding using infopath..

and so i don understand the code above ;-(

Can u please be kind enuf to explain me the variables and keywords used in the code like , Dim (which seems to be a keyword), Me.CreateNavigator , MedForms.dbo.tblTable.. ???

Thanks in advance

Re: Trouble with creating error messages when a query fails to return the data to the infopath form

g21cincy — Tue, 22 Feb 2011 15:36:15 GMT

I usually do this in the code behind the button. Here is the code I use. I hope this helps you out.

Dim Nav As XPathNavigator = Me.CreateNavigator()

Dim Query As AdoQueryConnection = Me.DataConnections("Data Source Qry")

Query.Command = "SELECT Id_number FROM MedForms.dbo.tblTable WHERE Id_number = '" & GetValue("XPath", Nav) & "'"

Query.Execute()

Dim IDNumberNav As XPathNavigator = Me.DataSources("Data Source Qry").CreateNavigator()

Dim IDNums As XPathNodeIterator = HospitalAcctNav.Select("/dfs:myFields/dfs:dataFields/d:tblTable", Me.NamespaceManager)

If IDNums.Count = 0 Then

Dim HospitalAcctInput As XPathNavigator = Me.CreateNavigator().SelectSingleNode("/dfs:myFields/dfs:queryFields/q:tblTable/@ID_Number", Me.NamespaceManager)

Me.Errors.Add(HospitalAcctInput, "Error", "Invalid ID Number")

Else

' Run query using Data Source

End If

Return

End If

Trouble with creating error messages when a query fails to return the data to the infopath form

radhikakumaran3 — Tue, 22 Feb 2011 14:09:09 GMT

Hello all,

I have designed forms in infopath that queries a sql table and based on the Id_number submitted , returns the details of the customer.

The problem is in case an Id_number for which no data is present inthe sql table is submitted, the form jst gives error like "could not connect to the data source or the session time out". I would like to customize the error here , like giving out a dialog box saying "invalid Id_number".

How do I do this?

To query the table I have used a web service which submits Id_number to the table.

Thanks..