2012年1月19日
摘要: 利用飞信给自己发短信的shell脚本翻译自一个python脚本因为openwrt要装python太大了.所以用了两天非工作时间 翻译成了 shell脚本 .测试可用.http://dl.dbank.com/c030f0gldi#!/bin/sh#Convert Python Fetion To Shell @2012user='xxxxxxxxx' #飞信账号 一般是你的手机号password='xxxxx' #飞信密码,但愿只有你自己知道.loginstatus='4' url_login='http://f.10086.cn/im/l 阅读全文
posted @ 2012-01-19 17:56 宋元 阅读(919) 评论(0) 推荐(1) 编辑
  2011年11月21日
摘要: public partial class DemoForm : Form { [Flags] enum MouseEventFlag : uint { Move = 0x0001, LeftDown = 0x0002, LeftUp = 0x0004, RightDown = 0x0008, RightUp = 0x0010, Midd... 阅读全文
posted @ 2011-11-21 18:37 宋元 阅读(554) 评论(0) 推荐(0) 编辑
  2011年10月13日
摘要: 比如说在TextBox中输入" \0\aiHPC" 此时TextBox.text 的值就是"\\0\\aiHPC" ,想要获得textBox.Text的原样输入值(没有添加转义字符)System.Text.RegularExpressions.Regex.Unescape(textBox1.Text) 就可以得到"\0\aiHPC ". 阅读全文
posted @ 2011-10-13 18:01 宋元 阅读(356) 评论(0) 推荐(0) 编辑
  2010年12月5日
摘要: 项目有个很变态的需求.由于预计同时打印的报表特别多.所以要给每个打印文档命名,以便知道每个病人报表的打印情况,可是水晶报表似乎并没有提供设置在提交给打印机队列前设置文档名,都是默认是document ,网上找了一天似乎都没结果,要么是根本就是没有实现,要么就是一点理解有问题..思考摸索了一天,google了一天,没有合适的解决方案!很遗憾,心一横用了一个周末的时间重写了CrystalReportViewer控件..希望对后来人有帮助..源代码如下: Imports CrystalDecisions.Windows.Forms Imports System.Reflection Imports. 阅读全文
posted @ 2010-12-05 12:58 宋元 阅读(514) 评论(0) 推荐(0) 编辑
  2010年11月22日
摘要: DataGridView实现监视滚动事件..处理当DataGridview 中的 ScrollBar滚动到 底部时的情况..Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load For i = 0 To 100 DataGridView1.Rows.Add(New DataGridViewRow) Next Dim pi = GetType(DataGridView)... 阅读全文
posted @ 2010-11-22 14:11 宋元 阅读(418) 评论(0) 推荐(0) 编辑
  2010年10月14日
摘要: cross apply tb表都存在姓名的情况下才出现 outer apply tb外表存在的都显示 create table #T(姓名 varchar(10)) insert into #T values('张三') insert into #T values('李四') insert into #T values(NULL ) create table #T2(姓名 varchar(10) , 课程 varchar(10) , 分数 int) insert into #T2 values('张三' , '语文' , 74) 阅读全文
posted @ 2010-10-14 06:27 宋元 阅读(251) 评论(0) 推荐(0) 编辑
  2010年5月14日
摘要: Insert Win 7 installation DVD and boot from DVD drive. While in some older systems you may have to change boot order through system BIOS, most newer systems allow booting from DVD without changing boot order by simply clicking on any key when prompted to doing so. Step 2 Choose your default ".. 阅读全文
posted @ 2010-05-14 20:36 宋元 阅读(242) 评论(0) 推荐(0) 编辑
  2010年4月22日
摘要: range.NumberFormatLocal = "@"; //设置单元格格式为文本 range = (Range)worksheet.get_Range("A1", "E1"); //获取Excel多个单元格区域:本例做为Excel表头 range.Merge(0); //单元格合并动作 worksheet.Cells[1, 1] = "Excel单元格赋值"; //Excel单元格赋值 range.Font.Size = 15; //设置字体大小 range.Font.Underline=true; //设置 阅读全文
posted @ 2010-04-22 11:07 宋元 阅读(557) 评论(0) 推荐(0) 编辑
摘要: 操作Excel时,如果数据量大的话,赋值是比较耗费时间的事. 以前一直是用 xlSheet.Cells(iStartCoumnIndex, iColumnIndex + 1) = dtRpt.Rows(iRowIndex)(iColumnIndex) 这样一个cell一个cell赋值结果,当数据量大时,生成的速度慢的很(有种假死的感觉). 网上一位牛人是这样说的:点这里. --------------------转-------------------- 由于对Excel的Cell赋值效率很低(因为每对Cell赋一次值都回导致调用一次Excel COM+组件的接口),所有如果数据多起... 阅读全文
posted @ 2010-04-22 01:30 宋元 阅读(486) 评论(0) 推荐(0) 编辑
  2010年4月15日
摘要: 自Sql Server联机帮助 USE AdventureWorks;GOSELECT SalesQuota, SUM(SalesYTD) 'TotalSalesYTD', GROUPING(SalesQuota) AS 'Grouping'FROM Sales.SalesPersonGROUP BY SalesQuota WITH ROLLUP;GO结果集在 SalesQuota 下面显示两个空值。第一个 NULL 代表从表中的这一列得到的空值组。第二个 NULL 位于 ROLLUP 操作所添加的汇总行之中。汇总行显示所有SalesQuota 组的 Total 阅读全文
posted @ 2010-04-15 18:04 宋元 阅读(490) 评论(0) 推荐(0) 编辑