★VS.Net编程★

.Net开发(个人主页:www.soft123.com 软件,文章,论坛,游戏,电影,书籍,编程)
posts - 25, comments - 212, trackbacks - 1, articles - 5
  博客园 :: 首页 :: 新随笔 :: 联系 :: 订阅 订阅 :: 管理

2011年2月28日

WordPress的Inove主题会有css IE6下错位的问题,BlogEngine.net也有。
这个主题的官方网站也存在这个问题 http://www.onesoft.dk/


如图:



修改前




修改后



解决方法:
修改文件:User controls/CommentView.ascx


找到
<asp:TextBox runat="server" ID="txtContent" TextMode="multiLine" Columns="50" Rows="10" TabIndex="6" ValidationGroup="AddComment" />
改成
<asp:TextBox runat="server" ID="txtContent" width="601px" TextMode="multiLine" Columns="50" Rows="10" TabIndex="6" ValidationGroup="AddComment" />

posted @ 2011-02-28 12:32 pcsky(进哥) 阅读(251) 评论(0) 编辑

2009年10月15日

摘要: 自己在项目里用的类,大家看一下~~[代码]阅读全文

posted @ 2009-10-15 20:33 pcsky(进哥) 阅读(173) 评论(3) 编辑

2008年2月22日

实现类似于Golden32导出Excel的一个类。
1、调用Excel直接打开导出结果
2、直接用块的方式写入Excel,提高了性能
3、数字型、日期型的数据能自动识别
4、设置单元格的格式用先列再行的方式,上万行记录也轻松对付。

因工作的需要,要把人事系统的查询结果导出到Excel中。
其中工号、日期字段导到Excel就变成了数值型和英文的日期格式,需要再手工设置格式,很麻烦。
参考了网上导出Excel的各种文章,解决了一些性能问题,终于完成了这个类~~

public static void Dst2Excel(ref DataSet _dst)
{
    
try
    
{
        Excel.Application xlApp 
= new Excel.Application();
        
if (xlApp == null)
        
{
            MessageBox.Show(
"Can't find Excel Object!");
            
return;
        }

        
if (_dst == null || _dst.Tables.Count <= 0)
        
{
            MessageBox.Show(
"无显示数据,请查询库数据或导入数据!!!");
            
return;
        }

        xlApp.Visible 
= true;

        
object missing = System.Reflection.Missing.Value;
        
int countcolumns = _dst.Tables[0].Columns.Count;
        
int countrows = _dst.Tables[0].Rows.Count;
        
string A = Get_TableHeader(countcolumns);
        
object[,] myvalues1 = new object[countrows + 1, countcolumns];

        Excel.Workbooks workbooks 
= xlApp.Workbooks;
        Excel.Workbook theWorkbook 
= workbooks.Add(missing);
        Excel.Sheets sheets 
= theWorkbook.Worksheets;
        Excel.Worksheet worksheet 
= (Excel.Worksheet)sheets.get_Item(1);
        Excel.Range range 
= worksheet.get_Range("A1", A + (countrows + 1).ToString());

        
// 标题行
        for (int j = 0; j < countcolumns; j++)
        
{
            myvalues1[
0, j] = _dst.Tables[0].Columns[j].Caption;
        }


        
// 内容行
        for (int j = 0; j < countcolumns; j++)
        
{
            
switch (_dst.Tables[0].Columns[j].DataType.ToString())
            
{
                
case "System.String":
                    worksheet.get_Range(worksheet.Cells[
1, j + 1], worksheet.Cells[countrows + 1, j + 1]).NumberFormatLocal = "@";
                    
break;
                
case "System.DateTime":
                    worksheet.get_Range(worksheet.Cells[
1, j + 1], worksheet.Cells[countrows + 1, j + 1]).NumberFormatLocal = "yyyy-mm-dd";
                    
break;
            }


            
for (int i = 1; i < countrows + 1; i++)
            
{
                myvalues1[i, j] 
= _dst.Tables[0].Rows[i - 1][j];
            }

        }


        range.Cells.Value2 
= myvalues1;
        workbooks 
= null;
        theWorkbook 
= null;
        sheets 
= null;
        worksheet 
= null;
        range 
= null;
        xlApp 
= null;
    }

    
catch (Exception ee)
    
{
        MessageBox.Show(ee.ToString());
    }

    
finally
    
{
        GC.Collect();
    }

}


public static string Get_TableHeader(int num)
{

    
string A = "";
    
for (int i = 0; i < num; i++)
    
{
        
if ((65 + i) < 91)
            A 
= ((char)(65 + i)).ToString();
        
else

            A 
= "A" + ((char)(i + 39)).ToString();   //i+39:Z后的字符转成A、B

    }

    
return A;
}

posted @ 2008-02-22 22:38 pcsky(进哥) 阅读(1812) 评论(12) 编辑

2005年8月11日

摘要: 改变VS2003中字符串的显示颜色,提高代码的可读性。阅读全文

posted @ 2005-08-11 21:14 pcsky(进哥) 阅读(2309) 评论(16) 编辑

2005年2月18日

    '截取固定长的字符串(双字节的计2位)
    '(字符串,ASC码长度,是否显示点号)
    Function mySubString(ByVal stringToSub As StringByVal length As IntegerOptional ByVal isShowingDot As Integer = True)
        
Dim regex As Regex = New Regex("[^\x00-\xff]", RegexOptions.Compiled)
        
Dim stringChar As Char() = stringToSub.ToCharArray()
        
Dim sb As StringBuilder = New StringBuilder

        
Dim nLength As Integer = 0
        
Dim i As Integer
        
For i = 0 To stringChar.Length - 1
            
If (regex.IsMatch((stringChar(i)).ToString())) Then
                sb.Append(stringChar(i))
                nLength 
+= 2
            
Else
                sb.Append(stringChar(i))
                nLength 
= nLength + 1
            
End If

            
If (nLength > length) Then
                
Exit For
            
End If
        
Next i

        
If isShowingDot = True And Trim(stringToSub) <> Trim(sb.ToString) Then
            
Return sb.ToString() + " "
        Else
            
Return sb.ToString()
        
End If

    
End Function

posted @ 2005-02-18 21:13 pcsky(进哥) 阅读(5671) 评论(5) 编辑

2005年2月1日

摘要: 在线人数统计 V1.0(Asp.net+ SqlServer) 自己用Asp.net编的,仿照asp的。 大家看看!  立即下载 在线人数统计 V1.0 刚才文件没传上来,现在应该可以了。阅读全文

posted @ 2005-02-01 18:00 pcsky(进哥) 阅读(1963) 评论(6) 编辑

2004年12月29日

摘要: Vs2005安装后,发现原来的Asp.net站点执行出错了。 找到半天,终于在IIS中找到可以设置的选项。 换成1.1方式,原来的网站就能运行了!阅读全文

posted @ 2004-12-29 20:09 pcsky(进哥) 阅读(1905) 评论(2) 编辑

2004年10月27日

摘要: Oracle8select a.*,b.* from a,b where a.id(+)=b.id --相当于左联接select a.*,b.* from a,b where a.id=b.id(+) --相当于右联接Oracle9支持以上的写法,还增加了LeftJoin、Right Join等select a.*,b.* from a left join b on a.id=b.idselect...阅读全文

posted @ 2004-10-27 19:05 pcsky(进哥) 阅读(10271) 评论(8) 编辑

2004年10月26日

摘要: 界面预览图:自己在用的.Net新闻系统,现在整理出来了,供大家下载数据库用的是ACCESS比较适合于个人使用请大家多提宝贵意见!网站预览:http://pcsky2004.vicp.net/news/下载地址:http://pcsky2004.vicp.net/bbs/NowTopic.aspx?forum=10&forumpage=1&topic=17阅读全文

posted @ 2004-10-26 20:30 pcsky(进哥) 阅读(4103) 评论(16) 编辑

2004年10月23日

摘要: 我开发中的.Net新闻系统能自动生成Html浏览地址:http://pcsky2004.vicp.net/news/结构图如下:生成的Html放在Html目录里,再根据月份自动生成文件夹。文本编辑器的图片就放在resources目录现在基本功能已经有了,还差评论、相关新闻、搜索等功能。阅读全文

posted @ 2004-10-23 17:29 pcsky(进哥) 阅读(3305) 评论(15) 编辑