Backup and recover physical and cloud-based servers and workstations, as well as endpoint devices that belong to remote users. Avoid downtime and data loss quickly and easily for Windows-based physical or public cloud-based workloads!
Sub TestWriteSQL() Dim cn As ADODB.Connection Dim rs As ADODB.Recordset Dim ClientID As String Set cn = New ADODB.Connection Set rs = New ADODB.Recordset cn.ConnectionString = "Provider=sqlncli; Data Source=MYSERVER; Initial Catalog=Test; Trusted_Connection=yes;" cn.Open ClientID = 7555 Set rs = cn.Execute("SELECT CustomFieldValue.Value, CustomRecordset.RecordId, CustomFieldValue.CustomFieldId FROM CustomFieldValue INNER JOIN CustomRecordset ON CustomFieldValue.CustomRecordsetId = CustomRecordset.Id WHERE CustomRecordset.RecordId = '" & ClientID & "' And (CustomFieldValue.CustomFieldId = 296)") 'rs.Edit rs!Value = 22 rs.Update Set rs = Nothing cn.Close End Sub
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Running total between 2 sql tables in Sql||6||50|
|Modify Text File with Excel Macro||13||49|
|HIghlights of SSIS?||3||44|
|SQL Server and Access Database (Project Codes) get the next record||43||35|
Join the community of 500,000 technology professionals and ask your questions.