untuk mengetahui jumlah recordcount , bisa menggunakan property 3,1 di belakang
contoh:

sqlstr = "Select * from tblMember"
rs.open sqlstr, conn, 3,1
msgbox rs.recordcount

gunakan hanya untuk view record saja, karena tidak dapat diupdate
semoga membantu

-Tommy-


----- Original Message ----
From: Ronald Irawan <[EMAIL PROTECTED]>
To: [email protected]
Sent: Tuesday, January 16, 2007 8:42:53 AM
Subject: Re: [Programmer-VB] Tanya execute Function SQL 2k di VB6 dong..









  


    
            

Bukannya ADO bisa ?

karena selama ini, kalau saya select
ke table/view selalu saya bisa hitung recordcount nya...

Nah untuk menggunakan View, sepertinya
agak berat,solusinya saya pikir ada 2

1. Menggunakan Store Procedure

2. MEnggunakaan View



Saya sudah coba pakai Sp gak bisa (
atau saya yg gak tahu caranya yah? :(

saya sedang coba pakai function, cuma
hasilnya selalu -1

Setahu saya kalau -1, sebetulnya ada
isinya, cuma mungkin ada salah di setting parameter ado nya or something,
ini yg saya masih blm tahun...



Thanks

Ronald Irawan

http://www.Foodinve stment.com/ ?id=ronald_ delgeano

Jakarta








"Ade Aan Wirama \(gmail\)"
<[EMAIL PROTECTED] com> 

Sent by: Programmer-VB@ yahoogroups. com
16/01/2007 08:21



Please respond to

Programmer-VB@ yahoogroups. com








To

<Programmer-VB@ yahoogroups. com>


cc





Subject

Re: [Programmer- VB] Tanya execute Function
SQL 2k di VB6 dong..















Dear Ronald,



Emang nggak ada "where" nya ya? soalnya kalo fcsliptransfer itu
table, ya

hasilnya adalah -1, karena ADO nggak bisa ngitung ada berapa record yang

ada.



best regards,

Ade Aan Wirama



----- Original Message ----- 

From: "Ronald Irawan" <ronald.irawan@ kalbefood. com>

To: <Programmer-VB@ yahoogroups. com>

Sent: Tuesday, January 16, 2007 8:01 AM

Subject: Re: [Programmer- VB] Tanya execute Function SQL 2k di VB6 dong..



> Aslinya memang adcursorclient pak, -1

> saya coba ganti ke useServer juga -1

> Any other suggestions?

>

> Thanks

> Ronald Irawan

> http://www.Foodinve stment.com/ ?id=ronald_ delgeano

> Jakarta

>

>

>

> LiveDeviL <devilsoftcorp@ gmail.com>

> Sent by: Programmer-VB@ yahoogroups. com

> 15/01/2007 16:31

> Please respond to

> Programmer-VB@ yahoogroups. com

>

>

> To

> Programmer-VB@ yahoogroups. com

> cc

>

> Subject

> Re: [Programmer- VB] Tanya execute Function SQL 2k di VB6 dong..

>

>

>

>

>

>

> coba cursorlocation nya diset ke adcursorclient

>

> Ronald Irawan wrote:

> >

> >

> > Dh,

> > Cara execute function sql2k gimana sih ?

> > saya pakai ini

> > SSQL = "select * from dbo.fcsliptransfer ('" &
txtNo.Text & "')

> > rsRFP.Open SSQL, cnPayment

> >

> > kenapa RsRFP saya recordcount nya selalu -1 ???

> >

> >

> > Thanks

> > Ronald Irawan

> > http://www.Foodinve stment.com/ ?id=ronald_ delgeano

> > Jakarta

> >

> >

>

>



 



    
  

    
    




<!--

#ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial,helvetica,clean,sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;
}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;
}
#ygrp-vitnav{
padding-top:10px;
font-family:Verdana;
font-size:77%;
margin:0;
}
#ygrp-vitnav a{
padding:0 1px;
}
#ygrp-actbar{
clear:both;
margin:25px 0;
white-space:nowrap;
color:#666;
text-align:right;
}
#ygrp-actbar .left{
float:left;
white-space:nowrap;
}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;
font-size:77%;
padding:15px 0;
}
#ygrp-ft{
font-family:verdana;
font-size:77%;
border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;
}

#ygrp-vital{
background-color:#e0ecee;
margin-bottom:20px;
padding:2px 0 8px 8px;
}
#ygrp-vital #vithd{
font-size:77%;
font-family:Verdana;
font-weight:bold;
color:#333;
text-transform:uppercase;
}
#ygrp-vital ul{
padding:0;
margin:2px 0;
}
#ygrp-vital ul li{
list-style-type:none;
clear:both;
border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;
color:#ff7900;
float:right;
width:2em;
text-align:right;
padding-right:.5em;
}
#ygrp-vital ul li .cat{
font-weight:bold;
}
#ygrp-vital a {
text-decoration:none;
}

#ygrp-vital a:hover{
text-decoration:underline;
}

#ygrp-sponsor #hd{
color:#999;
font-size:77%;
}
#ygrp-sponsor #ov{
padding:6px 13px;
background-color:#e0ecee;
margin-bottom:20px;
}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;
margin:0;
}
#ygrp-sponsor #ov li{
list-style-type:square;
padding:6px 0;
font-size:77%;
}
#ygrp-sponsor #ov li a{
text-decoration:none;
font-size:130%;
}
#ygrp-sponsor #nc {
background-color:#eee;
margin-bottom:20px;
padding:0 8px;
}
#ygrp-sponsor .ad{
padding:8px 0;
}
#ygrp-sponsor .ad #hd1{
font-family:Arial;
font-weight:bold;
color:#628c2a;
font-size:100%;
line-height:122%;
}
#ygrp-sponsor .ad a{
text-decoration:none;
}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;
}
#ygrp-sponsor .ad p{
margin:0;
}
o {font-size:0;}
.MsoNormal {
margin:0 0 0 0;
}
#ygrp-text tt{
font-size:120%;
}
blockquote{margin:0 0 0 4px;}
.replbq {margin:4;}
-->








 
____________________________________________________________________________________
Expecting? Get great news right away with email Auto-Check. 
Try the Yahoo! Mail Beta.
http://advision.webevents.yahoo.com/mailbeta/newmail_tools.html 

Kirim email ke