sendsms.cls

来自「短信平台管理系统是一个短信收发的平台,用户可以找一些代理的短信平台(IP),在系」· CLS 代码 · 共 27 行

VERSION 1.0 CLASS
BEGIN
  MultiUse = -1  'True
  Persistable = 0  'NotPersistable
  DataBindingBehavior = 0  'vbNone
  DataSourceBehavior  = 0  'vbNone
  MTSTransactionMode  = 0  'NotAnMTSObject
END
Attribute VB_Name = "m_sendsms"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = False
Attribute VB_Exposed = False
Attribute VB_Ext_KEY = "SavedWithClassBuilder6" ,"Yes"
Attribute VB_Ext_KEY = "Top_Level" ,"Yes"
 Public smsid As Integer
 Public mobile As String
 Public cid As Integer
 Public sms As String
      Public sendisok As Boolean
      Public rtime As Date
      
      Public stime As Date
      Public cname As String
Public smsfrom As Boolean
Public imsend As Boolean