<< Click to Display Table of Contents >> Object LWCRM.Database |
![]() ![]() ![]() |
Als databasegegevens moeten worden opgevraagd of gewzijgid dan biedt dit object enkele handige eigenschappen en methoden.
Voorbeeld
rstContact.Open strSQL, LWCRM.Database.Connection, adOpenForwardOnly, adLockReadOnly, adCmdText
Syntax
blnRemoved = LWCRM.Database.DeleteObjectEntry( intObjectType, strPrimaryKeyValue )
Parameters
intObjectType
Geef het objecttype door waarvan u een item wilt verwijderen.
strPrimaryKeyValue
De primary key waarmee de entry kan worden opgezocht.
Voorbeeld
blnRemoved = LWCRM.Database.DeleteObjectEntry( otContact, "00012" )
Execute : Long
Syntax
lngEffectedRows = LWCRM.Database.Execute( strSQL )
Parameters
strSQL
Een voor de actieve database geldig Transact SQL statement.
Voorbeeld
lngEffectedRows = LWCRM.Database.Execute( "UPDATE StockTransactions SET Processed = 1 WHERE Processed = 0" )
Syntax
strValue = LWCRM.Database.GetFieldValue( strSQL )
Parameters
strSQL
Een voor de actieve database geldig SQL statement.
Voorbeeld
strCountry = LWCRM.Database.GetFieldValue( " SELECT Name FROM Countries WHERE CountryCode = 'NL' " )
Syntax
strKeyValue = LWCRM.Database.Newkey( strKeyFieldName )
Parameters
strKeyFieldName
De naam van het sleutelveld.
Voorbeeld
strAccountId = LWCRM.Database.Newkey( "AccountId" )
Syntax
xmlRow = LWCRM.Database.RetrieveXmlLayout( strTableName )
Parameters
strTableName
De naam van de tabel waarvan de recordstructuur moet worden opgehaald.
Voorbeeld
xmlAccounts = LWCRM.Database.RetrieveXmlLayout( "Accounts" )
Syntax
strSqlDelete = LWCRM.Database.SQLDelete( strTableName )
Parameters
strTableName
De naam van de tabel waarvoor een DELETE statement moet worden geretourneerd.
Voorbeeld
strSQL = LWCRM.Database.SQLDelete("Accounts") + " WHERE AccountId = '00001' "
Syntax
blnSuccess = LWCRM.Database.SafeRowUpdate( txtUserId, rstRow, xmlRowdata )
Parameters
strUserId
De ID van de huidige gebruiker, welke kan worden bepaald middels LWCRM.User.UserId
rstRow
Referentie naar de ADO Recordset welke moet worden bijgewerkt.
Voorbeeld
If LWCRM.Database.SafeRowUpdate( LWCRM.User.UserId, rstContact, xmlContact ) Then ...
rstContact.Update
Syntax
strSQL = LWCRM.Database.LoadSQLQuery( strSQLQueryId )
Parameters
strSQLQueryId
Deze ID wordt gebruikt om de gewenste Query definitie op te zoeken in de tabel 'SQLQueries'
Voorbeeld
strSQL = LWCRM.Database.LoadSQLQuery( "00002" )
Syntax
varFieldValue = LWCRM.Database.RetrieveColumnValue( strTableName, strFieldName, varPrimaryKeyValue )
Parameters
strTableName
De naam van de tabel waarin het opgegeven veldwaarde moet worden opgezocht.
strFieldName
De naam van het veld waarvan het opgegeven veldwaarde moet worden opgezocht.
varPrimaryKeyValue
De waarde van het sleutelveld van de opgegeven tabel, waarin het opgegeven veld zich bevindt.
Voorbeeld
strCompanyName = LWCRM.Database.RetrieveColumnValue( "accounts", "name", "00211" )
- de eerste regel bestaat uit een koptekst
- velden worden gescheiden door komma's
- regels worden afgesloten met een <enter>
- tekst wordt omsloten door dubbele quotes ( " )
- de komma's in bedragen wordt omgezet naar een punt ( . )
- het internationale datumformaat wordt gehanteerd (yyyy-mm-dd oftwel jaar-maand-dag)
- in de logische (ja/nee) velden wordt 'ja' met een '1' aangeduid en 'nee' met een '0'
Syntax
blnExported = LWCRM.Database.ExportToCSV( strSql, strFileName )
Parameters
strSql
Dit dient een geldige SQL expressie te zijn.
strFileName
De naam van het uitvoerbestand.
Voorbeeld
strSql = "SELECT * FROM contacts"
blnExported = LWCRM.Database.ExportToCSV( strSql, "c:\temp\test.csv" )
Syntax
blnExported = LWCRM.Database.ExportToXLS( strSql, strFileName )
Parameters
strSql
Dit dient een geldige SQL expressie te zijn.
strFileName
De naam van het uitvoerbestand.
Voorbeeld
strSql = "SELECT * FROM contacts"
blnExported = LWCRM.Database.ExportToXLS( strSql, "c:\temp\test.xls" )