Mas Amin, mungkin masalahnya adalah di cara autentifikasi SQL Servernya.
Coba Heri periksa lagi apakah metode autentifikasi di SQL Server pakai
Windows Authentification atau Mixed Authentification. Kecurigaan saya adalah
SQL Servernya pakai Windows Authentification. Kalau ya, coba ganti ke Mixed
Authentification.

Semoga membantu.

Rgds,
Youppie Arliansyah

On 11/30/06, Mas Amin <[EMAIL PROTECTED]> wrote:

  di CR report juga kita bisa masukan user dan pwdnya pake kode program di
VB kok..
gampang bgt.. ntar saya kirim dech
soalnya agak berat
dikit
atao kalau bisa kita sama2 online aja...
biar kita bisa lgsg ngobrol..


*Heriyanto KO <[EMAIL PROTECTED]>* wrote:

 bagus juga idenya,thx ya mas amin. G minta modul prakteknya dong...
terutama untk form login,username&password yg diambil dr tex box itu berarti
user tersebut terdaftar sebagai user di database server kan?

nah mas kalo yg dibawah ini kan contoh untuk VBnya bagaimana di Crystal
Reportnya? kalo pertama kita sudah design dgn koneksi ODBC kalo mau ganti dg
ADODB gimana? apa bisa ? kalo bisa ajarin dong?

*Mas Amin <[EMAIL PROTECTED]>* wrote:

 Iya mas... ntar kalo user dan passwordnya bener kan oranglain bisa make
koneksi ODBC kita dan bisa masuk ke database kita seenak dia... bisa2
database kita dirusaknya..
Emang kalau di Test Connection dia akan error karna user n pwdnya salah,
solusinya untuk masukin user & pwdnya pake code program diVB. di VB kita
jangan pake komponen ADODC tapi buat koneksinya pake ADODB aja.. buat
koneksi ADODBnya di modul aja supaya bisa dipake disemua form..
ex :
*Global KONEKSIKU As New ADODB.Connection*
*Global DATAKU As New ADODB.Recordset*
 untuk manggil koneksi ODBCnya pake aja form login, ntar di form login
ketik aja program koneksinya :
*Private Sub xlogin_Click()*
*    On Error GoTo erkon*
*    Koneksiku.ConnectionString = "Provider=MSDASQL.1;Persist Security
Info=False;Data Source=DSNJN0610001;User Id='" & xuser.TEXT &
"';Password='" & xpassword.TEXT & "'"*
*     Koneksiku.Open*
*    If  Koneksiku.State = adStateOpen Then*
*            Koneksiku.CursorLocation = adUseClient*
*            Unload Me*
*            Fmenu.show(1)*
*    Else*
*        MsgBox "Connect Failed.. Please check your user name and
password.."*
*    End If*
*    Exit Sub*
*erkon:*
*    MsgBox "Failed to Connect to the Server"*
*End Sub*

itu sedikit contoh mas ntar kalo kurang insyaallah saya ada modul praktek
untuk itu.
moga membantu

*Heriyanto KO <[EMAIL PROTECTED]>* wrote:


 Thanks buat masukkannya....

tapi utk
"kalo kita pake database Server kayak MySQL, SQL server ato oracle, pada
seting ODBCnya gak usah dibuat User dan Password yang benernya.. ntar bisa
dimanfaatin orang yang tidak bertanggung jawab..."

maksudnya gimana? kalo kita gak masukin userId n Password berarti gimana
caranya dia mau tes kalo ODBCnya bisa jalan ato gak? trus koneksi di Vbnya
gimana?

maaf pertanyaannya byk maklum pemula nih... :)

*Mas Amin <[EMAIL PROTECTED]>* wrote:

 Kalo menurut saya.. ODBC memang ribetnya didalam installasi pada setiap
komputer karena semua komputer harus diset ODBCnya, tapi kalo memang itu
yang terbaik dan gak ada error, kenapa kita mesti pake yang lain... kalo
aplikasi kita untuk orang lain.. kan kita bisa buatin step by step untuk
seting ODBCnya di file Help... saya rasa itu solusi terbaik kok.. tambahan
dari saya... kalo kita pake database Server kayak MySQL, SQL server ato
oracle, pada seting ODBCnya gak usah dibuat User dan Password yang
benernya.. ntar bisa dimanfaatin orang yang tidak bertanggung jawab...
Semoga membantu...
Thanks....

*Heriyanto KO <[EMAIL PROTECTED]>* wrote:

 dear mas amin,
saya pake SQL server 2000, saya sudah coba pake ODBC n berhasil... krmn
saya pengen ganti ke OLEDB dg alasan saya gak mau direpotkan dg membuat ODBC
di setiap Client... selama ini menurut pengalaman anda, apakah kalo koneksi
dg ODBC gak Ribet?ato itu memang solusi terbaik?


*Mas Amin <[EMAIL PROTECTED]>* wrote:

 Kalo masalahnya cuma untuk ngubungin CR ke VB kan mudah banget..
tergantung databasenya pake apa..?
kalo pake Access koneksinya pake *datafile*
kalo untuk database MySQL, SQL Server atau Oracle yang koneksinya pake
ODBC pilih aja *Active Data* yang paling bawah, sahya selalu pake itu dan
alhamdulillah lancar terus...
tapi kalo pake database MySQL, SQL-Server atau oracle di VBnya harus ada
perintah Connect.. kalo gak nanti gak mau...
Masalah yang tepatnya dimana...?

*Heriyanto KO <[EMAIL PROTECTED]>* wrote:

 sama mas..
server has not been opened

*Ade Aan Wirama <[EMAIL PROTECTED]>* wrote:

 Oopps sorry, baru baca email, bisa tau errornya apa?

tks & rgds,
Ade Aan Wirama


On 11/27/06, Heriyanto KO <[EMAIL PROTECTED]> wrote:
>
>   Ade, thanks buat masukannya...
> masih blm bisa tuh.. kira2 kenapa ya?
> puyennngg nih... Helpp me...
>
> *Ade Aan Wirama <[EMAIL PROTECTED]>* wrote:
>
>  coba bake p2soledb.dll, SOL
>
>
> On 11/27/06, Heriyanto KO <[EMAIL PROTECTED] > wrote:
> >
> >   mungkin agak OOT ya?
> > tapi g mau nanya nih.. buat VB'ers, g kan desain Report dari crystal
> > report (koneksinya pake ODBC) trus saya add ke VB g.
> >
> > trus ada pesan error server has not been opened, ternyata harus ada
> > koneksi ke DB dl. trus g tambahin code :
> >
> > crptAppl.LogOnServerEx "p2sodbc.dll", "latihan", "latihan", "sa",
> > "ming"
> >
> > dan sukses tapi g coba pake OLEDB dan ada pesan error...kira2 kenapa
> > ya?
> > apa file *.dll nya harus diganti dg yg OLE ato gimana?kalo mesti di
> > ganti pake file apa ya?
> > thanks...
> >
> >
> > *Purwedi Kurniawan <[EMAIL PROTECTED]>* wrote:
> >
> >  kalau emang kita menggunakan adodb di program kita, mending kita
> > langsung set datasource dari datagridnya langsung ke recordset yg kita
> >
> > gunakan, ga perlu pake adodc (ngabisin memori :P)
> >
> > sincera
> > [poer]
> >
> > --- In [email protected] <Programmer-VB%40yahoogroups.com>,
> > nisa cute <[EMAIL PROTECTED]>
> > wrote:
> > >
> > > setuju dengan yg dibilang [EMAIL PROTECTED], pemanfaatan adodc
> > paling hanya untuk datagrid.
> > >
> >
> >
> >
> >
> >  ------------------------------
> > Everyone is raving about the all-new Yahoo! Mail 
beta.<http://us.rd.yahoo.com/evt=42297/*http://advision.webevents.yahoo.com/mailbeta>
> >
>
>
>  ------------------------------
> Sponsored Link
>
> Mortgage rates near 39yr lows. $510,000 Mortgage for $1,698/mo - Calculate
> new house 
payment<http://www.lowermybills.com/lre/index.jsp?sourceid=lmb-9134-16416&moid=4119>
>


 ------------------------------
Sponsored Link

Mortgage rates as low as 4.625% - $150,000 loan for $579 a month.
Intro-*Terms<https://www2.nextag.com/goto.jsp?product=100000035&url=%2fst.jsp&tm=y&search=b_rate150k&s=3968&p=5035&disc=y&vers=722>


 ------------------------------
Check out the all-new Yahoo! Mail 
beta<http://us.rd.yahoo.com/evt=43257/*http://advision.webevents.yahoo.com/mailbeta>-
 Fire up a more powerful email and get things done faster.


 ------------------------------
Everyone is raving about the all-new Yahoo! Mail 
beta<http://us.rd.yahoo.com/evt=42297/*http://advision.webevents.yahoo.com/mailbeta>.



 ------------------------------
Want to start your own business? Learn how on Yahoo! Small 
Business.<http://us.rd.yahoo.com/evt=41244/*http://smallbusiness.yahoo.com/r-index>


 ------------------------------
Sponsored Link

Mortgage rates near 39yr lows. $310,000 Mortgage for $999/mo - Calculate
new house 
payment<http://www.lowermybills.com/lre/index.jsp?sourceid=lmb-9133-16415&moid=4673>


 ------------------------------
Cheap Talk? Check 
out<http://us.rd.yahoo.com/mail_us/taglines/postman8/*http://us.rd.yahoo.com/evt=39663/*http://voice.yahoo.com>Yahoo!
 Messenger's low PC-to-Phone call rates.


 ------------------------------
Access over 1 million songs - Yahoo! Music 
Unlimited.<http://pa.yahoo.com/*http://us.rd.yahoo.com/evt=36035/*http://music.yahoo.com/unlimited/>


------------------------------
Everyone is raving about the all-new Yahoo! Mail 
beta.<http://us.rd.yahoo.com/evt=42297/*http://advision.webevents.yahoo.com/mailbeta>




--
Cheaper, Faster, Better: Only can get two of them. Cannot get three of them.
Programmer, Lecturer: Cannot get rich with two of them. The third is
missing.

Kirim email ke