If you put this line of code:
<message-resources parameter="ErrorMessages" key="errors" null="false"/>
into the struts-config.xml file it sets up a pointer to a message file called ErrorMessages.properties
In this file I only have two line right now cause I cant get thigs to work quite right...
I am trying to display error messages and the are displaying but not correctly. They display like this:
???en_US.Invalid userId or Password???
Here is the code that I use to fill the errors:
<code>
public class BaseAction extends Action {
public static final String APP_WARNING_KEY =...
I only want the date to display in a field but when you click in the field the time displays also. I have tried setting the format to mmm dd", "yyyy which looks great until you click in the field.
Is there anyway to prevent the time from displaying short of formating the field as text?
If this are is never to be enabled then change it to labels. If it has to be enabled occationally then instead of .enabled = false try .locked = true
Just a thought.
SELECT DISTINCT in_grp.TheData
FROM in_grp
WHERE (((in_grp.TheData) Not In (SELECT DISTINCT GrpMaster.GroupName FROM GrpMaster )));
This selects all of the distinct records from in_grp where they do not already exist in GrpMaster
Ok. Try This One.
Public Sub Text()
Dim strLine As String
Dim strACOD As String
Dim strCNUM As String
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("table1", dbOpenDynaset)
Open "C:\My Documents\gl0340.txt" For Input As #1
Do While Not EOF(1)
Line Input #1...
Check the 'Order By On' to make sure it is yes. It is on the data property tab for the report. There is also an 'Order By' property. You may have to set that.
Try this and take it from here.
Public Sub Text()
Dim strLine As String
Dim rs As DAO.Recordset
Set rs = CurrentDb.OpenRecordset("table1", dbOpenDynaset)
Open "C:\My Documents\gl0340.txt" For Input As #1
Do While Not EOF(1)
Line Input #1, strLine
If...
TI would not do that. I would leave the testing of the cbo in the same routinve as the call to your function. It should go in this procedure:
Private Sub cmdPrintSpecific_Click()
Dim strSQL As String
strSQL = "SELECT tblSalesLedger.InvoiceNumber, tblSalesLedger.InvoiceDate...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.