Threat intelligence is often discussed, but rarely understood. Starting with a precise definition, along with clear business goals, is essential.
Sub A() Call oAppend(Now, "another", 2) End Sub Public Sub oAppend(ByVal oDate As Date, ByVal oText As String, ByVal oNumber As Single) Dim oSQL As String On Error GoTo EH Set con = New ADODB.Connection con.Open "Provider=SQLOLEDB;Data Source=126.96.36.199,12244;Network Library=DBMSSOCN;Initial Catalog=test;User ID=mnmchhhh;Password=assupfaceinth3;" Set cmd = New ADODB.Command 'Check last ID --------------------------- Dim oLastID As Variant oLastID = "SELECT MAX(ID) FROM Table1" With cmd .CommandText = oLastID .CommandType = adCmdText .ActiveConnection = con .Execute End With End Sub
|VBA code to clear all filter and select||1||43|
|Splitting out Data||14||27|
|Excel 2016 - Method to delete all rows except those with specific color||3||20|
|Range Name from one WB to another...... Question||9||0|
Join the community of 500,000 technology professionals and ask your questions.
Connect with top rated Experts
14 Experts available now in Live!