Bismillahir rahmanir rahim.... Terimakasih Mas Hendra. Ini sedikit pengalaman saya. Kalau di database MySql script penggunaan store prosedure melalui vba sbb: Private Sub Command5_Click() Dim aa As Variant Dim rsp As ADODB.Recordset KONEKSI If conn.State <> 0 Then aa = "" Set rsp = conn.Execute("call P1('" & text1 & "');") If Not rsp.EOF Then Do While Not rsp.EOF aa = aa & rsp.Fields(0) & vbCrLf rsp.MoveNext Loop End If End If conn.Close Set conn = Nothing MsgBox aa End Sub Di dalam database MySql, sebelumnya sudah dibuat SP. Contohnya: CREATE PROCEDURE `P1`(in name char(255)) begin SELECT Nama_Masalah FROM BU_MASALAH where masalah=name; end; Semoga bermanfaat.. Hariyanto (Surabaya) --- On Tue, 10/7/12, Alu Syafrudin <alualde@rocketmail.com> wrote:
|
__._,_.___
SPAM IS PROHIBITED
.
__,_._,___
No comments:
Post a Comment