{"id":1351,"date":"2019-03-25T17:34:43","date_gmt":"2019-03-25T20:34:43","guid":{"rendered":"http:\/\/xexeu.elipse.com.br\/pt\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/"},"modified":"2020-02-20T15:13:17","modified_gmt":"2020-02-20T18:13:17","slug":"nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset","status":"publish","type":"post","link":"https:\/\/kb.elipse.com.br\/en\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/","title":{"rendered":"No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 – GetADORecordSet."},"content":{"rendered":"

O m\u00e9todo GetADORecordSet da consulta retorna um Recordset do tipo ADO (ActiveX Data Object), resultante da execu\u00e7\u00e3o da consulta configurada.<\/p>\n

O objeto ADO RecordSet \u00e9 usado para acessar os registros de uma tabela do banco de dados. Possui as seguintes propriedades e m\u00e9todos:<\/p>\n

Propriedades:
\nBOF<\/span>: Retorna verdadeiro se a posi\u00e7\u00e3o do ponteiro \u00e9 anterior ao primeiro registro.
\nEOF<\/span>: Retorna verdadeiro se a posi\u00e7\u00e3o do ponteiro \u00e9 posterior ao \u00faltimo registro.
\nRecordCount<\/span>: Retorna o n\u00famero de registros na tabela.<\/p>\n

M\u00e9todos:
\nMoveFirst<\/span>: Move o ponteiro para o primeiro registro
\nMoveLast<\/span>: Move o ponteiro para o \u00faltimo registro
\nMoveNext<\/span>: Move o ponteiro para o pr\u00f3ximo registro
\nMovePrevious<\/span>: Move o ponteiro para o registro anterior<\/p>\n

Para acessar os registros individualmente, utilizamos o comando Fields(“NomeCampo”).<\/p>\n

Exemplo:<\/p>\n

set RS = Screen.Item(\"Consulta1\").GetADORecordset()<\/span>
RS.MoveFirst\r\nfor i=1 to RS.RecordCount<\/span>
\u00a0\u00a0\u00a0 Campo1 = RS.Fields(\"Campo1\").Value<\/span>
\u00a0\u00a0\u00a0 Campo2 = RS.Fields(\"Campo2\").Value<\/span>
\u00a0\u00a0\u00a0 campo3 = RS.Fields(\"Campo3\").Value<\/span>
\u00a0\u00a0\u00a0 MsgBox Campo1 &vbTab& Campo2 &vbTab& Campo3<\/span>
\u00a0\u00a0\u00a0 RS.MoveNext\r\nnext<\/span><\/pre>\n
Exerc\u00edcios:<\/span>
\n<\/span>
\n1. Insira um objeto Banco de Dados no projeto e configure-o.
\n2. Crie 3 tags de demonstra\u00e7\u00e3o e grave-as no banco utilizando o objeto hist\u00f3rico. No hist\u00f3rico, configure o tempo de grava\u00e7\u00e3o para 0 segundos.
\n3. Insira um bot\u00e3o na tela que ao clicar grave um registro no hist\u00f3rico (WriteRecord)
\n4. Insira na tela um objeto consulta que busque os dados salvos pelo hist\u00f3rico.
\n5. Crie um bot\u00e3o na tela que ao clicar, mostre linha por linha do hist\u00f3rico. Utilize o comando While para repetir o script enquanto n\u00e3o chegar ao fim da tabela.<\/p>\n
Anexos:<\/h3>\n
Licao7.zip<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"
O m\u00e9todo GetADORecordSet da consulta retorna um Recordset do tipo ADO (ActiveX Data Object), resultante da execu\u00e7\u00e3o da consulta configurada….
\nAutor
\nPaula Pereira En\u00e9as<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_exactmetrics_skip_tracking":false,"_exactmetrics_sitenote_active":false,"_exactmetrics_sitenote_note":"","_exactmetrics_sitenote_category":0},"categories":[578,610],"tags":[],"yoast_head":"\nNo\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 - GetADORecordSet.[:] - Elipse Knowledgebase<\/title>\n<meta name=\"robots\" content=\"index, follow, max-snippet:-1, max-image-preview:large, max-video-preview:-1\" \/>\n<link rel=\"canonical\" href=\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/\" \/>\n<meta property=\"og:locale\" content=\"en_US\" \/>\n<meta property=\"og:type\" content=\"article\" \/>\n<meta property=\"og:title\" content=\"No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 - GetADORecordSet.\" \/>\n<meta property=\"og:description\" content=\"O m\u00e9todo GetADORecordSet da consulta retorna um Recordset do tipo ADO (ActiveX Data Object), resultante da execu\u00e7\u00e3o da consulta configurada.... Autor Paula Pereira En\u00e9as\" \/>\n<meta property=\"og:url\" content=\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/\" \/>\n<meta property=\"og:site_name\" content=\"Elipse Knowledgebase\" \/>\n<meta property=\"article:publisher\" content=\"http:\/\/www.facebook.com\/elipsesoftware\" \/>\n<meta property=\"article:published_time\" content=\"2019-03-25T20:34:43+00:00\" \/>\n<meta property=\"article:modified_time\" content=\"2020-02-20T18:13:17+00:00\" \/>\n<meta name=\"author\" content=\"Elipse Software\" \/>\n<meta name=\"twitter:card\" content=\"summary_large_image\" \/>\n<meta name=\"twitter:label1\" content=\"Written by\" \/>\n\t<meta name=\"twitter:data1\" content=\"Elipse Software\" \/>\n\t<meta name=\"twitter:label2\" content=\"Est. reading time\" \/>\n\t<meta name=\"twitter:data2\" content=\"1 minute\" \/>\n<script type=\"application\/ld+json\" class=\"yoast-schema-graph\">{\"@context\":\"https:\/\/schema.org\",\"@graph\":[{\"@type\":\"Article\",\"@id\":\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/#article\",\"isPartOf\":{\"@id\":\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/\"},\"author\":{\"name\":\"Elipse Software\",\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/person\/def69ea453ea60b250497b89225a9f87\"},\"headline\":\"No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 – GetADORecordSet.\",\"datePublished\":\"2019-03-25T20:34:43+00:00\",\"dateModified\":\"2020-02-20T18:13:17+00:00\",\"mainEntityOfPage\":{\"@id\":\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/\"},\"wordCount\":243,\"commentCount\":0,\"publisher\":{\"@id\":\"https:\/\/kb.elipse.com.br\/#organization\"},\"articleSection\":[\"Elipse E3\",\"Scripts\"],\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"CommentAction\",\"name\":\"Comment\",\"target\":[\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/#respond\"]}]},{\"@type\":\"WebPage\",\"@id\":\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/\",\"url\":\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/\",\"name\":\"[:pt]No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 - GetADORecordSet.[:] - Elipse Knowledgebase\",\"isPartOf\":{\"@id\":\"https:\/\/kb.elipse.com.br\/#website\"},\"datePublished\":\"2019-03-25T20:34:43+00:00\",\"dateModified\":\"2020-02-20T18:13:17+00:00\",\"breadcrumb\":{\"@id\":\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/#breadcrumb\"},\"inLanguage\":\"en-US\",\"potentialAction\":[{\"@type\":\"ReadAction\",\"target\":[\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/\"]}]},{\"@type\":\"BreadcrumbList\",\"@id\":\"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/#breadcrumb\",\"itemListElement\":[{\"@type\":\"ListItem\",\"position\":1,\"name\":\"In\u00edcio\",\"item\":\"https:\/\/kb.elipse.com.br\/en\/\"},{\"@type\":\"ListItem\",\"position\":2,\"name\":\"No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 – GetADORecordSet.\"}]},{\"@type\":\"WebSite\",\"@id\":\"https:\/\/kb.elipse.com.br\/#website\",\"url\":\"https:\/\/kb.elipse.com.br\/\",\"name\":\"Elipse Knowledgebase\",\"description\":\"\",\"publisher\":{\"@id\":\"https:\/\/kb.elipse.com.br\/#organization\"},\"potentialAction\":[{\"@type\":\"SearchAction\",\"target\":{\"@type\":\"EntryPoint\",\"urlTemplate\":\"https:\/\/kb.elipse.com.br\/?s={search_term_string}\"},\"query-input\":\"required name=search_term_string\"}],\"inLanguage\":\"en-US\"},{\"@type\":\"Organization\",\"@id\":\"https:\/\/kb.elipse.com.br\/#organization\",\"name\":\"Elipse Software\",\"url\":\"https:\/\/kb.elipse.com.br\/\",\"sameAs\":[\"http:\/\/www.facebook.com\/elipsesoftware\"],\"logo\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/logo\/image\/\",\"url\":\"https:\/\/kb.elipse.com.br\/wp-content\/uploads\/2019\/05\/schererelipse-com-br\/logoElipse.png\",\"contentUrl\":\"https:\/\/kb.elipse.com.br\/wp-content\/uploads\/2019\/05\/schererelipse-com-br\/logoElipse.png\",\"width\":161,\"height\":58,\"caption\":\"Elipse Software\"},\"image\":{\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/logo\/image\/\"}},{\"@type\":\"Person\",\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/person\/def69ea453ea60b250497b89225a9f87\",\"name\":\"Elipse Software\",\"image\":{\"@type\":\"ImageObject\",\"inLanguage\":\"en-US\",\"@id\":\"https:\/\/kb.elipse.com.br\/#\/schema\/person\/image\/\",\"url\":\"https:\/\/secure.gravatar.com\/avatar\/ff1f7ec38f4687b06f6851d97b3cd2d0?s=96&d=mm&r=g\",\"contentUrl\":\"https:\/\/secure.gravatar.com\/avatar\/ff1f7ec38f4687b06f6851d97b3cd2d0?s=96&d=mm&r=g\",\"caption\":\"Elipse Software\"},\"url\":\"https:\/\/kb.elipse.com.br\/en\/author\/webmasterelipse-com-br\/\"}]}<\/script>\n<!-- \/ Yoast SEO plugin. -->","yoast_head_json":{"title":"No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 - GetADORecordSet.[:] - Elipse Knowledgebase","robots":{"index":"index","follow":"follow","max-snippet":"max-snippet:-1","max-image-preview":"max-image-preview:large","max-video-preview":"max-video-preview:-1"},"canonical":"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/","og_locale":"en_US","og_type":"article","og_title":"[:pt]No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 - GetADORecordSet.[:] - Elipse Knowledgebase","og_description":"[:pt]O m\u00e9todo GetADORecordSet da consulta retorna um Recordset do tipo ADO (ActiveX Data Object), resultante da execu\u00e7\u00e3o da consulta configurada.... Autor Paula Pereira En\u00e9as[:]","og_url":"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/","og_site_name":"Elipse Knowledgebase","article_publisher":"http:\/\/www.facebook.com\/elipsesoftware","article_published_time":"2019-03-25T20:34:43+00:00","article_modified_time":"2020-02-20T18:13:17+00:00","author":"Elipse Software","twitter_card":"summary_large_image","twitter_misc":{"Written by":"Elipse Software","Est. reading time":"1 minute"},"schema":{"@context":"https:\/\/schema.org","@graph":[{"@type":"Article","@id":"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/#article","isPartOf":{"@id":"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/"},"author":{"name":"Elipse Software","@id":"https:\/\/kb.elipse.com.br\/#\/schema\/person\/def69ea453ea60b250497b89225a9f87"},"headline":"No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 – GetADORecordSet.","datePublished":"2019-03-25T20:34:43+00:00","dateModified":"2020-02-20T18:13:17+00:00","mainEntityOfPage":{"@id":"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/"},"wordCount":243,"commentCount":0,"publisher":{"@id":"https:\/\/kb.elipse.com.br\/#organization"},"articleSection":["Elipse E3","Scripts"],"inLanguage":"en-US","potentialAction":[{"@type":"CommentAction","name":"Comment","target":["https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/#respond"]}]},{"@type":"WebPage","@id":"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/","url":"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/","name":"[:pt]No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 - GetADORecordSet.[:] - Elipse Knowledgebase","isPartOf":{"@id":"https:\/\/kb.elipse.com.br\/#website"},"datePublished":"2019-03-25T20:34:43+00:00","dateModified":"2020-02-20T18:13:17+00:00","breadcrumb":{"@id":"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/#breadcrumb"},"inLanguage":"en-US","potentialAction":[{"@type":"ReadAction","target":["https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/"]}]},{"@type":"BreadcrumbList","@id":"https:\/\/kb.elipse.com.br\/nocoes-de-vbscript-no-software-elipse-e3-licao-7-getadorecordset\/#breadcrumb","itemListElement":[{"@type":"ListItem","position":1,"name":"In\u00edcio","item":"https:\/\/kb.elipse.com.br\/en\/"},{"@type":"ListItem","position":2,"name":"No\u00e7\u00f5es de VBScript no Software Elipse E3: Li\u00e7\u00e3o 7 – GetADORecordSet."}]},{"@type":"WebSite","@id":"https:\/\/kb.elipse.com.br\/#website","url":"https:\/\/kb.elipse.com.br\/","name":"Elipse Knowledgebase","description":"","publisher":{"@id":"https:\/\/kb.elipse.com.br\/#organization"},"potentialAction":[{"@type":"SearchAction","target":{"@type":"EntryPoint","urlTemplate":"https:\/\/kb.elipse.com.br\/?s={search_term_string}"},"query-input":"required name=search_term_string"}],"inLanguage":"en-US"},{"@type":"Organization","@id":"https:\/\/kb.elipse.com.br\/#organization","name":"Elipse Software","url":"https:\/\/kb.elipse.com.br\/","sameAs":["http:\/\/www.facebook.com\/elipsesoftware"],"logo":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/kb.elipse.com.br\/#\/schema\/logo\/image\/","url":"https:\/\/kb.elipse.com.br\/wp-content\/uploads\/2019\/05\/schererelipse-com-br\/logoElipse.png","contentUrl":"https:\/\/kb.elipse.com.br\/wp-content\/uploads\/2019\/05\/schererelipse-com-br\/logoElipse.png","width":161,"height":58,"caption":"Elipse Software"},"image":{"@id":"https:\/\/kb.elipse.com.br\/#\/schema\/logo\/image\/"}},{"@type":"Person","@id":"https:\/\/kb.elipse.com.br\/#\/schema\/person\/def69ea453ea60b250497b89225a9f87","name":"Elipse Software","image":{"@type":"ImageObject","inLanguage":"en-US","@id":"https:\/\/kb.elipse.com.br\/#\/schema\/person\/image\/","url":"https:\/\/secure.gravatar.com\/avatar\/ff1f7ec38f4687b06f6851d97b3cd2d0?s=96&d=mm&r=g","contentUrl":"https:\/\/secure.gravatar.com\/avatar\/ff1f7ec38f4687b06f6851d97b3cd2d0?s=96&d=mm&r=g","caption":"Elipse Software"},"url":"https:\/\/kb.elipse.com.br\/en\/author\/webmasterelipse-com-br\/"}]}},"_links":{"self":[{"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/posts\/1351"}],"collection":[{"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/comments?post=1351"}],"version-history":[{"count":4,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/posts\/1351\/revisions"}],"predecessor-version":[{"id":9750,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/posts\/1351\/revisions\/9750"}],"wp:attachment":[{"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/media?parent=1351"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/categories?post=1351"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/kb.elipse.com.br\/en\/wp-json\/wp\/v2\/tags?post=1351"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}