2014年3月10日
摘要：
'发邮件DimobjOutlookDimobjOutlookMsgDimolMailItem' Create the Outlook object and the new mail object.SetobjOutlook=CreateObject("Outlook.Application")Set... 阅读全文
posted @ 2014-03-10 17:20
上海—Michael
阅读(350)
评论(0)
推荐(0)
摘要：
'注意：其中DSN=数据源名；UID=用户名；PWD=用户密码DimConnSetConn=CreateObject("ADODB.Connection")ConstConnectionString="DSN=test;DATABASE=aaa;PWD=123456;PORT=3306;SERVER... 阅读全文
posted @ 2014-03-10 17:18
上海—Michael
阅读(262)
评论(0)
推荐(0)
摘要：
'注意：其中DSN=数据源名；UID=用户名；PWD=用户密码DimConnSetConn=CreateObject("ADODB.Connection")ConstConnectionString="DSN=test;DATABASE=aaa;PWD=123456;PORT=3306;SERVER=172.18.4.125;UID=root"'Const ConnectionString="Driver={Mysql ODBC 5.1 Driver};DATABASE=test;PWD=root;PORT=3306;SERVE 阅读全文
posted @ 2014-03-10 17:17
上海—Michael
阅读(130)
评论(0)
推荐(0)
摘要：
a=10dimarr1()ReDimarr1(a,1)a=2dimarr()ReDimarr(a)arr(1)=2arr(2)=3ReDimpreservearr(10)arr(3)=4Foreachiinarrprint arr(i)Next 阅读全文
posted @ 2014-03-10 17:14
上海—Michael
阅读(622)
评论(0)
推荐(0)
摘要：
Dimflagflag=trueSetWshShell=CreateObject("WScript.Shell")'创建WScript.Shell对象SetoNotepad=WshShell.Exec("notepad")'运行记事本WshShell.AppActivate oNotepad.Pro... 阅读全文
posted @ 2014-03-10 17:08
上海—Michael
阅读(453)
评论(0)
推荐(0)
摘要：
DWORD GetNamedSecurityInfo(LPTSTRpObjectName,// object nameSE_OBJECT_TYPEObjectType, // object typeSECURITY_INFORMATIONSecurityInfo,// 消息类型PSID*ppsidO... 阅读全文
posted @ 2014-03-10 11:10
上海—Michael
阅读(1044)
评论(0)
推荐(0)
浙公网安备 33010602011771号