[Programmer-VB] execute SP from VB

[madhi]

rekan2x, saya ingin menanyakan perbandingan dari block coding di bawah ini :   'Block code 1   Dim cn as ADODB.Connection Dim cmd as ADODB.Command Dim params as ADODB.Parameters Dim param as ADODB.Parameter   ' Create connection and command objects Set cn = New ADODB.Connection Set cmd = New ADODB.Command   ' Set connection properties and open cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=DBPersonalia;Data Source=." cn.Open   ' Set command properties With cmd  Set .ActiveConnection = cn  .CommandText = "SPDMTMDept"  .CommandType = adCmdStoredProc  Set params = .Parameters End With   ' Refresh parameters from database params.Refresh   ' Specify input parameter values params("@pro") = MyVariable params("@Department") = MyVariable params("@Department1") = MyVariable   ' Execute the command cmd.Execute , , adExecuteNoRecords   ' Block Code 2   Dim cn as ADODB.Connection Dim cmd as ADODB.Command Dim params as ADODB.Parameters Dim param as ADODB.Parameter   ' Create connection and command objects Set cn = New ADODB.Connection Set cmd = New ADODB.Command   ' Set connection properties and open cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=DBPersonalia;Data Source=." cn.Open cn.execute "exec SPDMTMDept " & pro & ",'" & Dept & "', '" & Dept1 & "'"    dari segi penulisan coding, block code 2 lebih pendek dari pada block code 1. dari segi performance, mana yg lebih bagus? mohon review dari masing2x block code di atas. terima kasih sebelumnya. Untuk keluar dari millis ini, kirim email kosong ke: [EMAIL PROTECTED] YAHOO! GROUPS LINKS  Visit your group "Programmer-VB" on the web.    To unsubscribe from this group, send an email to:  [EMAIL PROTECTED]    Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.