What's in the eBook?
- Full list of reasons for poor performance
- Ultimate measures to speed things up
- Primary web monitoring types
- KPIs you should be monitoring in order to increase your ROI
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
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.