-
One I missed earlier .... arghhhhhh
ute_class_form.inc
Private Sub InitForm ()
.....
' m_RSForm.Open m_sTable, m_DB, adOpenStatic, adLockPessimistic, adCmdTable
m_RSForm.Open "[" & m_sTable & "]", m_DB, adOpenStatic, adLockPessimistic, adCmdTable ' *** SGC
This allows adding of records to tables with spaces in the table names.
2008-11-13 15:36:55 UTC by nobody
-
Another modification / kludge
This lists the table types I needed but excludes the system tables (and possibly others that may be required) I also added the database table type by modifying the HTML table with the addition of a column. As such the routine below replaces the existing routine in the ute_class_database.inc file
{You may have to sort out line wrapping issues if you copy and...
2008-11-13 12:47:34 UTC by nobody
-
The following modification is quite useful ;)
It allows all objects in the database table list to be displayed. Now I can access Linked Tables.
ute_class_database.inc
buildHTML_Database
' if UCase(rstSchema("TABLE_TYPE")) = "TABLE" then
if UCase(rstSchema("TABLE_TYPE")) > "" then ' *** SGC
hope my further, further kludge is of even more help....
s g c o u g h l a n @_h o t m...
2007-11-13 11:32:49 UTC by nobody
-
This change stops the FILTER from leaping out of a FRAME....
ute_class_filter.inc
buildFilterCountList
"onChange=""jumpPage('parent', this, 0)"">" & vbCrLf *** SGC
"onChange=""jumpPage('self', this, 0)"">" & vbCrLf
hope my further kludge is of help....
s g c o u g h l a n @_h o t m a i l . c o m
remove the spaces and underscore...... ;)
2007-11-12 17:51:42 UTC by nobody
-
Ok ... well if you wanted and update here goes......
ute_class_form.inc
sSQL = sCmd & " FROM " & m_sTable
sSQL = sCmd & " FROM " & "[" & m_sTable & "]" '' *** SGC Added enclosing brackets
sSQL = sSQL & AddWhere (sField, nType, sValue, "=", "AND", bFirst)
sSQL = sSQL & AddWhere ("[" & sField & "]", nType, sValue, "=", "AND", bFirst) '' *** SGC Added enclosing brackets...
2007-11-12 17:15:17 UTC by nobody
-
This is a first fix of the problem when listing tables that have a space in the field names which gives a "80040E14: Syntax error (missing operator) in query expression 'Part Number'" type error.
This does not solve the filter field space problem which should be coming later.
2007-11-08 08:31:19 UTC by tmd_63
-
Thank you 'nobody'. That was very helpful and solved this problem very well.
However, this symptom has permiated through the code. I have found that the filters have a similar problem of not addressing fields that have a space in the description (ie 'Part Number' does not work as the code assumes that the space is not part of the field name. This needs changing to [Part Number] in this area...
2007-11-08 08:18:01 UTC by tmd_63
-
Thank you 'nobody'. That was very helpful and solved this problem very well.
However, this symptom has permiated through the code. I have found that the filters have a similar problem of not addressing fields that have a space in the description (ie 'Part Number' does not work as the code assumes that the space is not part of the field name. This needs changing to [Part Number] in this area...
2007-11-08 08:16:15 UTC by tmd_63
-
Thank you 'nobody'. That was very helpful and solved this problem very well.
However, this symptom has permiated through the code. I have found that the filters have a similar problem of not addressing fields that have a space in the description (ie 'Part Number' does not work as the code assumes that the space is not part of the field name. This needs changing to [Part Number] in this area...
2007-11-08 08:14:59 UTC by tmd_63
-
This issue seems to permiate the code, I am in the process of modifying and testing the code. If you know how to debug the code the affore mentioned sugestion may help you solve a couple of other issues as well.
2007-11-07 15:06:41 UTC by nobody
