test.bas

来自「短信开发控件」· BAS 代码 · 共 15 行

Attribute VB_Name = "Module1"
Option Explicit

Public Declare Function SendSms Lib "C:\tempt\kkstar_sms.dll" _
   (ByVal cGateWay As String, _
    ByVal cUserName As String, _
    ByVal cPassword As String, _
    ByVal cPhone As String, _
    ByVal cContent As String, _
    ByVal cNickName As String, _
    ByVal cExtent As String) As String
    
Public Declare Function GetGatewayList Lib "C:\tempt\kkstar_sms.dll" () As String