随笔分类 - .NET
摘要：昨天遇到一个问题，在做导出Excel模块时，发现只能控制首行的列类型，不能设置整列的类型，客户却要在这一列中填入如“0802”这样的值，如果按照默认的类型客户填写完之后就会发现填写的内容会变成“802”，为了不让客户再嚷嚷。决定解决这个问题。在我的不懈的搜索和尝试下终于找到了。不说那么多了，分享一下吧。Application oApp; Workbook oBook=null; Works...
阅读全文
摘要：1.冒泡法：通过相邻两个数挨个比较，将大的数逐渐退后。#include <iostream.h> void BubbleSort(int* pData,int Count){ int iTemp; for(int i=1;i<Count;i++) { for(int j=Count-1;j>=i;j--) { if(pData[j]<pData[j-1]) { iTe...
阅读全文
摘要：1、用Office组件完成。 sub Test() dim objExcel dim objExcelSheets,objExcelBook,objExcelSheet if Isobject(objExcel) then objExcel.Quit set objExcel=nothing end if strsql="SELECT id, title, author,url FROM art...
阅读全文
摘要：跟前一篇差不多，只是方法不同，和生成速度不同。呵呵，比较简单。'1、输入url目标网页地址，返回值getHTTPPage是目标网页的html代码 Function getHTTPPage(url) dim Http set Http=createobject("Msxml2.XMLHTTP") Http.open "post",url,false,"","" Http.send if Http.r...
阅读全文
摘要：发现自己的记性越来越不好了。哎，怕忘了，把它记下来吧。发现自己倒退了许多，为了糊口又做起了自己不会的ASP。哎！！！其实跟ASP.NET的原理是一样的，可能通用。简单的写一下。其实这个东西也很简单，我在这里简单的写一下重要的东西。变量替换就不写。这个是读模板的操作，strModelFile是模板的名字function readModel(strModelFile) readModel = "" ...
阅读全文
