- 博客(14)
- 收藏
- 关注
原创 VB.NET根据年月获得总周数
Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click MsgBox("总周数:" & GetTotalWeeks(Me.monthid.Text)) End Sub Private Funct
2012-02-17 16:49:21
2075
原创 VB.NET根据年月和选择的第几周,得到次周日起范围
Private Sub Button7_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button7.Click MsgBox("范围:" & GetWeekPeriod(Me.monthid.Text, Me.weeks.Text)(0) & " " & GetWeekPeri
2012-02-17 16:47:16
2788
转载 js实现复制,删除一行div或一行table
转:http://hi.baidu.com/lmydream0417/blog/item/1d7523393f1b3628b8998fd2.html2010-05-26 15:28<br />在网上看到一段通过对节点的控制增加或删除一行table的代码如下:<br /><!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
2010-07-08 17:17:00
6868
原创 VB.NET通过SAP.Connector调用SAP的RFC
<br />'调用RFC<br />Dim myDest As New SAP.Connector.Destination<br />Dim myProx As New DEMO_GetData.SAPProxy1<br /><br />Public Function SapStr(ByVal stype As Integer) As String<br /> Dim str As String<br /> '测试机<br /> str = "用户名,密码,系统
2010-06-21 08:56:00
2243
原创 随机数的产生
<br /> Private Shared Function GeneratePassword(ByVal nLength)<br /> Dim i, bMadeConsonant, c, nRnd<br /> Const strDoubleConsonants = "bd9fgl0mnp3st"<br /> Const strConsonants = "b1c4dfg2hk8lmn7pqr6stv"<br /> Const strVocal =
2010-06-18 09:14:00
472
原创 组合和排列
组合:定义:从m个不同的元素里,每次取出n个元素,不管以怎样的顺序并成一组,均称为组合。其所有不同组合的种数用符号C n(上标)m(下标)表示,C n(上标)m(下标)=m(m-1)…(m-n +1)=m!/(n!(m-n)!)。此外,规定C 0(上标)m(下标)=1。 C n(上标)m(下标)=C m-n(上标)m(下标);排列:一般地,从n个不同元素中取出m(m≦n)个元素,按照一定的顺序排成一列,叫做从n个元素中取出m个元素的一个排列(Arrangement)。 根据排列的定义,两个排列相同,当且
2010-06-10 23:12:00
1368
原创 div浮动层被图片、select等遮挡的处理办法
<br />在div层内加一段iframe代码:<br /><iframe style="width:100%;filter:alpha(opacity=0);-moz-opacity:0; height:185px; position:absolute; z-index:-1"></iframe> <br /> <br /> <br />如果被flash遮挡:<br />对flash加个参数<param name="wmode" value="opaque" />
2010-06-09 13:26:00
3849
原创 GRIDVIEW表头行列合并的设计方法
<br />整理中。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。。
2010-06-09 10:51:00
495
原创 简洁查看自己定制的股票信息
<br />list=*** 为股票代码<br />代码:<br /> <br /><script type="text/javascript" src="http://hq.sinajs.cn/list=sh600383" charset="gb2312"><br /></script><br /><script type="text/javascript" src="http://hq.sinajs.cn/list=sh600208" charset="gb2312"><br /> </script><
2010-06-09 10:45:00
644
转载 Cookie功能被禁用,如何启用?
如果您使用的是IE7、IE6版本,请按以下几个步骤启用cookie:点击菜单条上的"工具"(Tool) 在展开的菜单里,选择最下面一条"Internet选项"(Internet Options) 在打开的Internet 选项设置窗口里,顶上有一条标签栏,点击第三个"隐私"(Privacy) 在"隐私"的设置里,中间偏下有四个按钮,点击第四个按钮"默认"(Default) 点击按钮"确定"(OK),关闭cookie设置窗口 点击按钮"确定"(OK),关闭Internet 选项设置窗口 重新刷新本页面 如果您
2010-06-02 09:06:00
8566
原创 控制页面按钮的样式
/*添加按钮的样式*/.btnadd{border:1px solid #cccccc;width:70px;height:28px;line-height:28px;text-align:center;padding-left:20px;background:url(add.gif)}/*删除按钮的样式*/.btndel{border:1px solid #cccccc;width:70
2010-05-17 21:04:00
601
原创 ASP中取得图片宽度和高度的类(无组件)
Class ImgWHInfo 获取图片宽度和高度的类,支持JPG,GIF,PNG,BMP Dim ASO Private Sub Class_Initialize Set ASO=Server.CreateObject("ADODB.Stream") ASO.Mode=3 ASO.Type=1 ASO.Open End Sub Private Sub Class_Terminate Err.C
2005-02-01 08:31:00
696
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人