Syntax
| HtmBuildFields(rs)
| ||||
---|---|---|---|---|---|
Description
| Returns a parameters and values string for use in combination with the HtmParseFile method. All fields in the current record in the ADODB.recordset variable are used as a source with the field names as the parameters. The values are automatically formatted, based on the field type and, ocassionally and when needed, also based on parts of the field names.
| ||||
See Also
| |||||
Example
| Sub Main
Dim rs as ADODB.Recordset, OrderNr As Variant OrderNr = HtmGetField(OrderNummer) SQL.RunRecordset "SELECT PJ.KlantCode, WH.OrderInput, WH.Datum, WH.LeverDatum, WH.Omschrijving, WH.WerkAdres1, WH.WerkAdres2, WH.Postcode, WH.Plaats, WH.Land " & _
"FROM ProjectHeaders PJ WITH (READUNCOMMITTED) INNER JOIN WerkorderHeaders WH WITH (READUNCOMMITTED) " & _
"ON PJ.Admin = WH.Admin AND PJ.Nummer = WH.ProjectNummer " & _
"INNER JOIN PaklijstHeaders PH WITH (READUNCOMMITTED) " & _
"ON PH.Admin = WH.Admin AND PH.WOnummer = WH.Nummer " & _
"WHERE WH.Admin = 1 " & _
"AND ISNULL(PJ.Status, '') NOT IN ('H') " & _
"AND ISNULL(WH.Status, '') NOT IN ('H') " & _
"AND WH.Nummer = " & OrderNr, rs, adOpenKeyset, adLockReadOnly, adUseClient
HtmParseFile "tablet\loodslijst.htm", HtmBuildFields(rs) rs.Close Set rs = Nothing End Sub
| ||||