上一页 1 ··· 32 33 34 35 36 37 38 39 40 ··· 50 下一页
  2011年3月15日
摘要: VC MFC程序,列举浏览器“历史”记录并记录到文件中:void CMy111Dlg::OnButton1() { HRESULT hr; IUrlHistoryStg2 *puhs; IEnumSTATURL *pesu; STATURL su; ULONG celt; _bstr_t bstr; hr = ::CoCreateInstance(CLSID_CUrlHistory, NULL, CLSCTX_INPROC_SERVER, IID_IUrlHistoryStg, (LPVOID*)&puhs); if(SUCCEEDED(hr)) { hr = puhs-> En 阅读全文
posted @ 2011-03-15 21:47 清清飞扬 阅读(1158) 评论(0) 推荐(0)
  2011年3月14日
摘要: VC++中,CTime 与 CString转换CTime m_StartTime1 = CTime::GetCurrentTime();CString csStartTime = m_StartTime1.Format( "%Y%m%d%H%M%S" );使用sprintf及sscanf函数进行CString与CTime之间的转换 一.将CString转为CTime的几种方法CString timestr = "2000年04月05日"; int a,b,c ; sscanf(timestr.GetBuffer(timestr.GetLength()), 阅读全文
posted @ 2011-03-14 11:48 清清飞扬 阅读(7334) 评论(0) 推荐(0)
  2011年3月12日
摘要: 在实际的项目开发中我们需要通过vb(或其他语言工具)调用oracle程序包内的存储过程返回结果集.这里以短信运营平台中的一个调用为例来说明这个过程,希望对你有所帮助.--一.使用sql*plus创建以下项目:--1.建表("ow_smp"为方案名称,下同)create table "ow_smp"."sm_send_sm_list"( serialno int primary key, --序列号 serviceid varchar(50), --服务id(业务类型) smcontent varchar(1000), --短信内容 s 阅读全文
posted @ 2011-03-12 10:16 清清飞扬 阅读(2178) 评论(0) 推荐(0)
  2011年3月11日
摘要: 经过今天尝试MFC解析XML串,也算有了不少收获,总结一下。我是使用的CMarkup类对XML进行操作。CMarkup好象都是先从一个xml文件里面把内容读出来,再进行解析,搞得我恨不得要把我的CString写到xml文件里面再取出来了。如果需要直接读取CString,可以直接用 CMarkup::SetDoc方法。最后其他的方法转载别人的使用例子,写得很全。来自http://hi.baidu.com/yxifu/blog/item/fa1569225bda52a44623e8f0.html(一)先讲一下XML中的物殊字符,手动填写时注意一下。字符字符实体&&或& 阅读全文
posted @ 2011-03-11 10:51 清清飞扬 阅读(2534) 评论(0) 推荐(0)
  2011年3月6日
摘要: 实用的oracle备份实例:如oracle登录名/密码:x1/x2, Oracle服务名:orcle,则备份orcl到当前目录下的代码:exp x1/x2@orcl file=./x1%date:~11,6%.dmp log=./x1%date:~11,6%.log owner=x1 阅读全文
posted @ 2011-03-06 23:05 清清飞扬 阅读(614) 评论(0) 推荐(0)
  2011年3月2日
摘要: ed2k://|file|MSDN_Oct_2001.iso|1558814720|df9843995248f3f88a273f3458f5c4f3|/ 阅读全文
posted @ 2011-03-02 09:01 清清飞扬 阅读(781) 评论(0) 推荐(0)
  2011年3月1日
摘要: mu_Choose = "3"Dim i, sMethodif IsNumeric(mu_Choose) Then i = CInt(mu_Choose) if i < 1 or i > 4 Then i = 0 end ifelse i = 0end ifsMethod = Array("hh", "addition", "subtract", "multiply", "division")'sMethod(0) = "hh"' 阅读全文
posted @ 2011-03-01 22:39 清清飞扬 阅读(1345) 评论(0) 推荐(1)
摘要: 具体调用的代码:'向指定的文件写入文本, 并指定是否是添加内容Function Z_WriteFile(sFileName, sText, bAppend) Dim fs, fso, iomode if bAppend = True Then iomode = 8 'ForAppending else iomode = 2 'ForWriting end if set fs = CreateObject("Scripting.FileSystemObject") set fso = fs.OpenTextFile(sFileName, iomode, 阅读全文
posted @ 2011-03-01 10:51 清清飞扬 阅读(3856) 评论(3) 推荐(0)
摘要: vbs过程参数--byref(默认)和byval请看例子:On error resume NextSub A1(byval s) s = s & "125"End SubFunction A2(byval s) s = s & "125" A2 = sEnd FunctionDim p1, p2, p3p1 = "what1"p2 = "what2"A1 p1p3 = A2(p2)MsgBox p1 & " : " & p2 & " : &quo 阅读全文
posted @ 2011-03-01 09:15 清清飞扬 阅读(1119) 评论(0) 推荐(0)
  2011年2月28日
摘要: '向指定的文件写字符串,第三个参数指定是否删除原来的内容Function Z_WriteLog(sFileName, sText) Dim fs, fso, sLog sLog = Now() & ": " & sText set fs = CreateObject("Scripting.FileSystemObject") set fso = fs.OpenTextFile(sFileName, 8, True) '第三个参数表明文件不存在,则新建文件 fso.WriteLine sLog fso.Close set f 阅读全文
posted @ 2011-02-28 18:16 清清飞扬 阅读(1753) 评论(0) 推荐(0)
上一页 1 ··· 32 33 34 35 36 37 38 39 40 ··· 50 下一页