当前位置:首页 > 开发 > 正文内容

icePubDll.dll vb版部分函数声明

jinesc8年前 (2012-05-22)开发2099
'vb版部分函数声明
'gui
Private Declare Function icePub_getInputText Lib "icePubDll.dll" (ByVal strInfo As String, ByVal strTitle As String) As Integer
Private Declare Function icePub_getInputTextEx Lib "icePubDll.dll" (ByVal strInfo As String, ByVal strTitle As String, ByVal inputLen As Integer) As Integer
Private Declare Function icePub_dispText Lib "icePubDll.dll" (ByVal strInfo As String, ByVal strTitle As String, ByVal clipFlag As Integer) As Integer
Private Declare Function icePub_getLogonInfo Lib "icePubDll.dll" (ByVal strUserId As String, ByVal strPassword As String, ByVal strTitle As String) As Integer
Private Declare Function icePub_getImageString Lib "icePubDll.dll" (ByVal strInfo As String, ByVal strBmpFilename As String) As Integer
Private Declare Function icePub_getImageString2 Lib "icePubDll.dll" (ByVal strInfo As String, ByVal strBmpFilename As String, ByVal strTitle As String) As Integer
Private Declare Function icePub_dispValue Lib "icePubDll.dll" (ByVal val As Long) As Integer


'datetime
Private Declare Function icePub_getCurrentTimes Lib "icePubDll.dll" (ByVal strTimes As String) As Integer

'socket
Private Declare Function icePub_tcpSendAndReceiveText Lib "icePubDll.dll" (ByVal sendBuff As String, ByVal sendBuffLen As Integer, ByVal recvBuff As String, ByVal recvMaxLen As Integer, ByVal serverIP As String, ByVal serverPort As Integer) As Integer

Private Declare Function icePub_tcpDomain2ip Lib "icePubDll.dll" (ByVal strDomain As String, ByVal strIP As String) As Integer

 

'mail
Private Declare Function icePub_sendMailText Lib "icePubDll.dll" (ByVal strusername As String, ByVal strPassword As String, ByVal strSmtpServer As String, ByVal sendMail As String, ByVal toMailList As String, ByVal strSubject As String, ByVal strText As String) As Integer

Private Declare Function icePub_receiveMailText Lib "icePubDll.dll" (ByVal strusername As String, ByVal strpwd As String, ByVal strsmtpsever As String, ByVal strMailText As String, ByVal TextMaxLen As Integer, ByVal strFenge As String, ByVal deleteFlag As Integer) As Integer
Private Declare Function icePub_receiveMailTextToFile Lib "icePubDll.dll" (ByVal strusername As String, ByVal strpwd As String, ByVal strsmtpsever As String, ByVal strFenge As String, ByVal strFileName As String, ByVal appendFlag As Integer, ByVal deleteFlag As Integer) As Integer

'image
Private Declare Function icePub_imgToBmp Lib "icePubDll.dll" (ByVal strImgFilename As String, ByVal strBmpFilename As String, ByVal huiFlag As Integer) As Integer
Private Declare Function icePub_bmpToJpg Lib "icePubDll.dll" (ByVal strBMPFilename As String, ByVal strJPGFilename As String, ByVal huiFlag As Integer) As Integer

Private Declare Function icePub_saveScreen Lib "icePubDll.dll" (ByVal bmpFile As String) As Integer
Private Declare Function icePub_saveScreenJpg Lib "icePubDll.dll" (ByVal jpgFile As String) As Integer

Private Declare Function icePub_imgReverse Lib "icePubDll.dll" (ByVal strImgFilename As String, ByVal strBmpFilename As String, ByVal flag As Integer) As Integer
Private Declare Function icePub_imgCircumgyrate Lib "icePubDll.dll" (ByVal strImgFilename As String, ByVal strBmpFilename As String, ByVal radian As Integer) As Integer


'ini
Private Declare Function icePub_getIniString Lib "icePubDll.dll" (ByVal strDefaultValue As String, ByVal strGroupName As String, ByVal strKeyName As String, ByVal strIniFilename As String, ByVal strResult As String) As Integer

Private Declare Function icePub_getIniValue Lib "icePubDll.dll" (ByVal valDefaultValue As Integer, ByVal strGroupName As String, ByVal strKeyName As String, ByVal strIniFilename As String) As Integer

Private Declare Function icePub_setIniString Lib "icePubDll.dll" (ByVal strValue As String, ByVal strGroupName As String, ByVal strKeyName As String, ByVal strIniFilename As String) As Integer

 

'inet
Private Declare Function icePub_openUrl Lib "icePubDll.dll" (ByVal currentUrlString As String, ByVal strHtmlText As String, ByVal TextMaxLen As Integer) As Integer
Private Declare Function icePub_postUrl Lib "icePubDll.dll" (ByVal hostAddress As String,ByVal strObject As String,ByVal m_param As String,ByVal Referer As String,ByVal strHtmlText As String,ByVal textMaxLen As Integer,ByVal strProxy As String) As Integer
Private Declare Function icePub_openUrl2 Lib "icePubDll.dll" (ByVal currentUrlString As String, ByVal strHtmlText As String, ByVal TextMaxLen As Integer) As Integer
Private Declare Function icePub_postUrl2 Lib "icePubDll.dll" (ByVal hostAddress As String,ByVal strObject As String,ByVal m_param As String,ByVal Referer As String,ByVal strHtmlText As String,ByVal textMaxLen As Integer,ByVal strProxy As String) As Integer


'machinecode
Private Declare Function icePub_machineGetInfo Lib "icePubDll.dll" (ByVal typeFlag As Integer,ByVal strInfo As String) As Integer


'system
Private Declare Function icePub_activForm Lib "icePubDll.dll" (ByVal strFormTitle As String) As Integer

Private Declare Function icePub_reboot Lib "icePubDll.dll" () As Integer
Private Declare Function icePub_shutdown Lib "icePubDll.dll" () As Integer

 

 

'string
Private Declare Function icePub_countSubString Lib "icePubDll.dll" (ByVal strInfo As String, ByVal strSubString As String) As Integer

Private Declare Function icePub_countSubStringFromFile Lib "icePubDll.dll" (ByVal strFilename As String, ByVal strSubString As String) As Integer

Private Declare Function icePub_getSubString Lib "icePubDll.dll" (ByVal strText As String, ByVal strResult As String, ByVal strBegin As String, ByVal strEnd As String, ByVal startIndex As Integer) As Integer


Private Declare Function icePub_getHrefLinks Lib "icePubDll.dll" (ByVal strText As String, ByVal strLinkList As String, ByVal strTextList As String, ByVal strFenge As String) As Integer

 

Private Declare Function icePub_getSelectPath Lib "icePubDll.dll" (ByVal strPath As String,ByVal maxLen As Integer) As Integer

 

Private Declare Function icePub_UTF8toUnicode Lib "icePubDll.dll" (ByVal strUtf8Info As String,ByVal strInfo As String,ByVal strMaxLen As Integer) As Integer

 


'digest
Private Declare Function icePub_getMD5FromString Lib "icePubDll.dll" (ByVal strData As String,ByVal strResult As String) As Integer
Private Declare Function icePub_sha1FromString Lib "icePubDll.dll" (ByVal strData As String,ByVal strResult As String) As Integer

 


'other
Private Declare Function icePub_open Lib "icePubDll.dll" (ByVal strPath As String) As Integer

 


'path
Private Declare Function icePub_deleteFiles Lib "icePubDll.dll" (ByVal strCurrentPath As String) As Integer

标签: SQL

相关文章

SQLSERVER2000数学函数 .8年前 (2012-05-22)
一个SQL 语句 8年前 (2012-06-01)
vb关闭应用程序8年前 (2012-06-10)

发表评论

访客

看不清,换一张

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。