Terima kasih atas bantuannya. Saya sudah coba dan alhamdulillah
berhasil. Semoga kebaikan rekan-rekan semua diterima dan dibalas
dengan berlipat oleh Tuhan YME. Amin


--- In [email protected], Ade Aan Wirama <[EMAIL PROTECTED]>
wrote:
>
> Waalaikumsalam Wr Wb,
>   
>   Mas dicky, saya coba bantu ya...
>   
>   Crystal Report:
>   
>   1. Untuk yang CR, misal nama reportnya rpttest, Letakkan text
object di rpttest dengan nama misal txtnama.
>   2. di source code vb6nya:
>       dim rpttest as new crTest
>       rpttest.settext.txtnama "Ade Aan Wirama" atau nama variabel
untuk pencetak laporan.
>   
>   Backup SQL Server:
>
>   Private srv As SQLDMO.SQLServer
>   
>   Set srv=Server.CreateObject("SQLDMO.SQLServer")
> srv.Connect "servername", "username", "password"
> Set br=Server.CreateObject("SQLDMO.Backup")
>   
>   br.Database="Northwind"
> br.Devices=Files
> br.Files="c:\nwind.bak"
> br.SQLBackup srv
>   srv.disconnect
>   set br=nothing
> set srv=nothing
>   
>   Restore SQL Server:
>   
>   Private srv As SQLDMO.SQLServer
>   
>   Set srv=Server.CreateObject("SQLDMO.SQLServer")
> srv.Connect "servername", "username", "password"
> Set br=Server.CreateObject("SQLDMO.Restore")
> br.Action=0 ' full db restore
> br.Database="Northwind"
> br.Devices=Files
> br.Files="c:\nwind.bak"
> br.ReplaceDatabase=True 'Force restore over existing database
> br.SQLRestore srv
>   srv.disconnect
>   set br=nothing
> set srv=nothing
>   
>   Demikian, mudah2an berguna
>   
>   tks & rgds,
>   Ade Aan Wirama






Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer




SPONSORED LINKS
Programmer Indonesia Basic programming language
Computer programming languages Programming languages Java programming language


YAHOO! GROUPS LINKS




Kirim email ke