A Visual Basic example on how to update a record if it exists or insert it if it doesn’t.<\/p>\n
Sub RecordStandardizedComputer(WS As String)<\/span>\r\n \u00a0Dim txt1 As String, txt2 As String, txt3 As String<\/span>\r\n \u00a0Dim xSQL As String<\/span>\r\n\r\n\u00a0txt3 = \"SELECT ComputerID from LOG_ComputersStandardized\" _\r\n & \" where ComputerName = \" & WS<\/span>\r\n\r\n\u00a0txt2 = \"INSERT INTO LOG_ComputersStandardized (ComputerName, RunTime)\" _\r\n & \"VALUES (\" & WS & \"','\" & Now.ToString & \"')\"<\/span>\r\n\r\n\u00a0txt1 = \"UPDATE LOG_ComputersStandardized SET \" _<\/span>\r\n \u00a0 & \" DateTime = '\" & Now.ToString & \"'\" _<\/span>\r\n \u00a0 & \" WHERE ComputerName = '\" & WS & \"'\"<\/span>\r\n\r\n\u00a0xSQL = \"IF NOT EXISTS (\" & txt3 & \")\" & txt2 & \" ELSE \" & txt1<\/span>\r\n \u00a0ExecuteSqlCommand(xSQL)<\/span>\r\n End Sub<\/span><\/pre>\n","protected":false},"excerpt":{"rendered":"A Visual Basic example on how to update a record if it exists or insert it if it doesn’t. Sub RecordStandardizedComputer(WS As String) \u00a0Dim txt1 As String, txt2 As String, txt3 As String \u00a0Dim xSQL As String \u00a0txt3 = “SELECT ComputerID from LOG_ComputersStandardized” _ & ” where ComputerName = ” & WS \u00a0txt2 = “INSERT […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"jetpack_post_was_ever_published":false,"_jetpack_newsletter_access":"","_jetpack_dont_email_post_to_subs":false,"_jetpack_newsletter_tier_id":0,"_jetpack_memberships_contains_paywalled_content":false,"_jetpack_memberships_contains_paid_content":false,"footnotes":"","jetpack_publicize_message":"","jetpack_publicize_feature_enabled":true,"jetpack_social_post_already_shared":false,"jetpack_social_options":{"image_generator_settings":{"template":"highway","default_image_id":0,"font":"","enabled":false},"version":2}},"categories":[8,9],"tags":[29,58,70,77],"class_list":["post-168","post","type-post","status-publish","format-standard","hentry","category-sql","category-vb-net","tag-example","tag-programming","tag-sql","tag-vb-net"],"jetpack_publicize_connections":[],"jetpack_featured_media_url":"","jetpack_sharing_enabled":true,"jetpack_shortlink":"https:\/\/wp.me\/p9t3oE-2I","_links":{"self":[{"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/posts\/168","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=168"}],"version-history":[{"count":7,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/posts\/168\/revisions"}],"predecessor-version":[{"id":319,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=\/wp\/v2\/posts\/168\/revisions\/319"}],"wp:attachment":[{"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=168"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=168"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/techref.camellarry.com\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=168"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}