vba - ADODB Recordset.RecordCount giving incorrect answer -


i have issue recordset returning -1 recordcount when in fact there 1164 records.

i have checked query fine. though tells me there -1 records copyfromrecordset method still works , pastes correct results. never had issue before using rs.recordcount?

dim strsql string dim rs new adodb.recordset  if cust = "jpm"     port = "rp l99" else     port = "rp v10" end if  strsql = "my select query"  rs.open strsql, cn, adopenkeyset, adlockoptimistic rs.movefirst getcompanies = rs.recordcount if getcompanies > 0    wslive.range("a" & rowcompanystart).copyfromrecordset rs    wslive.range("c" & rowcompanystart & ":c" & getcompanies + rowcompanystart).numberformat = "0.00%" end if closerecordset rs  end function

to actual count, need first move cursor last record move beginning. however, remember large dataset, moving , forth inefficient task. so, suggest following caution. 

    dim strsql string     dim rs new adodb.recordset      if cust = "jpm"         port = "rp l99"     else         port = "rp v10"     end if      strsql = "my select query"      rs.cursortype = adopendynamic      rs.open strsql, cn, adopenkeyset, adlockoptimistic      if not (rs.bof , rs.eof)         rs.movelast         rs.movefirst         getcompanies = rs.recordcount         wslive.range("a" & rowcompanystart).copyfromrecordset rs         wslive.range("c" & rowcompanystart & ":c" & getcompanies + rowcompanystart).numberformat = "0.00%"           'else         'msgbox "no records !!"     end if      closerecordset rs end function

Comments

Post a Comment

Popular posts from this blog

IF statement in MySQL trigger -

this query code in mysql trigger. if 1=2 select 'yes'; else select 'no'; end if; but has following error: if '1'='2' select 'yes' error code: 1064. have error in sql syntax; check manual corresponds mysql server version right syntax use near 'if '1'='2' select 'yes'' @ line 1 0.000 sec what solution?
Read more

c++ - What does MSC in "// appease MSC" comments mean? -

i run across // appease msc in c++ comments, e.g. here : const int& array::operator[](int offset) const { int mysize = getitssize(); if (offset >= 0 && offset < getitssize()) return ptype[offset]; throw xboundary(); return ptype[offset]; // appease msc! } what msc stand ? the author means microsoft's compiler, more formally known msvc.
Read more

javascript - Blogger related post gadget image Resize s72-c [ Need Expert Help ] -

i run blogger blog , use follow code javascript code (requires no jquery) show related post labels/categories of post. <script type='text/javascript'> var defaultnoimage=&quot;http://1.bp.blogspot.com/-m72rpguntq0/vuokijudn_i/aaaaaaaaboi/lq18sceunsg/w72/favicon-tik.png&quot;; var maxresults=16; var splittercolor=&quot;#d4eaf2&quot;; var relatedpoststitle=&quot;related posts&quot;; </script> <script type='text/javascript'>//<![cdata[ var relatedtitles = new array(); var relatedtitlesnum = 0; var relatedurls = new array(); var thumburl = new array(); function related_results_labels_thumbs(json) { (var = 0; < json.feed.entry.length; i++) { var entry = json.feed.entry[i]; relatedtitles[relatedtitlesnum] = entry.title.$t; try { thumburl[relatedtitlesnum] = entry.media$thumbnail.url } catch (error) {...
Read more