dbUserLocalText

Change the system display text of the headers, button, label etc.. Due to the fact that the constant from the ASPdb.Inc file must be used for the TextIndex1, it is most likely the property is in a format like - X.dbUserLocalText=Constant & ",NewText;...". It is easier to use the Designer to construct this property. Also, do not use this property to change to a different language entirely, instead, contact USIntertech Inc. to make arrangement for a language compile.

Property Syntax

Obj.dbUserLocalText="(;,)TextIndex1,NewText1;TextIndex2,NewText2;... repeat"

Parameters

Parameters

Default Value

Description

(;,) (;,) Group and field delimiter.
TextIndex   This is the constant from the ASPdb.Inc file
NextText   Replace text

 

Example - Change just one item

The following example change the Select button of the SelectedItem from the default 'Select' to Order'.

<!-- #include File=AspDB.Inc -->
<%
Set X= Server.CreateObject("AspDB.EP")
X.dbUnit = 1
X.dbMode="dual-horiz"
X.dbDSN = "NWIND"
SQL="SELECT Customers.CustomerID, CompanyName, OrderID FROM Customers "
SQL=SQL & "LEFT JOIN Orders ON Customers.CustomerID = Orders.CustomerID "
SQL=SQL & "ORDER BY OrderID"
X.dbSQL=SQL
X.dbSelectedItemMacro="#0# #2#" 
X.dbUserLocalText=zSelect & ",Order"
X.dbNavigationItem="top,bottom,prev,next"
X.ASPdbY2K
response.write("Selected String=" & X.dbSelectedItem & "<BR>")
%>

Example - Change more than one item

<%
Set X=Server.CreateObject("AspDB.EP")
X.dbQuickProps="1;NWIND;employees;both;4;;;ACCESS;5;1;1"
X.dbEditParams="TableName=employees, EditBookMarkFlds=0"
X.dbGridDisplayFlds="0,1,2"
X.dbNavigationItem="top,bottom,prev,next,filter,edit,add,update,delete"

s = zHead & ",<Center><h3>Add My record</h3></Center>; "
s = s & zDelHead & ",<h3>Delete This record</h3>; "
s = s & zAddhead & ",<h3>Master Edit Screen</h3>; "
s = s & zFilterHead & ",<CENTER><H3>Search Screen</H3></CENTER>; "
s = s & zHead & ",<CENTER><H3>My Main Heading</H3></CENTER>; "
s = s & zEdit & ",Go Edit; "
s = s & zUpdate & ",Update This Record;"
s = s & zClear & ",Start Over;"
s = s & zDelete & ",Go Delete; "
s = s & zReturn & ",Return w/o Change; "
s = s & zUpdateHead & ",Update This Record; "
s = s & zCopyRec & ",Make a Copy;"
s = s & zApplyFilter & ",Go Search; "
s = s & zDrop & ",Toggle DropDown; "
s = s & zReset & ",Reset; "
s = s & zMemoText & ",Memo"

X.dbUserLocalText=s
X.ASPdbY2K
%>

 

Notes

Reference

See ASPdbInc.html