Excel上传找到错误数据类型

一:查询数据库表中字段的类型语句

SELECT  CASE WHEN col.colorder = 1 THEN obj.name
                  ELSE ''
             END AS 表名,
        col.colorder AS 序号 ,
        col.name AS 列名 ,
        ISNULL(ep.[value], '') AS 列说明 ,
        t.name AS 数据类型 ,
        col.length AS 长度 ,
        ISNULL(COLUMNPROPERTY(col.id, col.name, 'Scale'), 0) AS 小数位数 ,
        CASE WHEN COLUMNPROPERTY(col.id, col.name, 'IsIdentity') = 1 THEN '1'
             ELSE ''
        END AS 标识 ,
        CASE WHEN EXISTS ( SELECT   1
                           FROM     dbo.sysindexes si
                                    INNER JOIN dbo.sysindexkeys sik ON si.id = sik.id
                                                              AND si.indid = sik.indid
                                    INNER JOIN dbo.syscolumns sc ON sc.id = sik.id
                                                              AND sc.colid = sik.colid
                                    INNER JOIN dbo.sysobjects so ON so.name = si.name
                                                              AND so.xtype = 'PK'
                           WHERE    sc.id = col.id
                                    AND sc.colid = col.colid ) THEN '1'
             ELSE ''
        END AS 主键 ,
        CASE WHEN col.isnullable = 1 THEN '1'
             ELSE ''
        END AS 允许空 ,
        ISNULL(comm.text, '') AS 默认值
FROM    dbo.syscolumns col
        LEFT  JOIN dbo.systypes t ON col.xtype = t.xusertype
        inner JOIN dbo.sysobjects obj ON col.id = obj.id
                                         AND obj.xtype = 'U'
                                         AND obj.status >= 0
        LEFT  JOIN dbo.syscomments comm ON col.cdefault = comm.id
        LEFT  JOIN sys.extended_properties ep ON col.id = ep.major_id
                                                      AND col.colid = ep.minor_id
                                                      AND ep.name = 'MS_Description'
        LEFT  JOIN sys.extended_properties epTwo ON obj.id = epTwo.major_id
                                                         AND epTwo.minor_id = 0
                                                         AND epTwo.name = 'MS_Description'
WHERE   obj.name = ''--表名
ORDER BY col.colorder ;

 效果图:

二:帮助类

主要判断Excel表格中字段类型和数据库中的字段类型 ,(使用插件aspose.cells)

 public  class DataTypeHelper
    {
        public static bool IsCanConvert(string str, DataColumn col)
        {

            if (col.DataType.Name.ToLower() == "decimal")
            {
                try
                {
                    if (str == "IsDecimal" || str == "IsNumeric")
                    {
                        return true;
                    }

                    return false;
                }
                catch (Exception)
                {

                    return false;
                }
            }

            if (col.DataType.Name.ToLower() == "string")
            {
                try
                {
                    if (str == "IsString")
                    {
                        return true;
                    }

                    return false;
                }
                catch (Exception)
                {

                    return false;
                }
            }

            if (col.DataType.Name.ToLower() == "int")
            {
                try
                {

                    if (str == "IsInt")
                    {
                        return true;
                    }

                    return false;
                }
                catch (Exception)
                {

                    return false;
                }
            }

            if (col.DataType.Name.ToLower() == "datetime")
            {
                try
                {

                    if (str == "IsDateTime")
                    {
                        return true;
                    }

                    return false;
                }
                catch (Exception)
                {

                    return false;
                }
            }
            return false;
        }
       
    }

 三:业务处理代码:

1.拼接一条查询返回Excel对应表中的第一条数据:

                   string dd = Context.Config.InsertSql;
                    string[] a1 = dd.Split(')');
                    string[] b = a1[0].Split('(');
                    string c = b[0].Replace("insert", "").Replace("into", "").Trim();
                    //查询出一条记录
                    string strSql = "select top 1 " + b[1] + " from " + c;

 2.循环判断:

  DataTable dt1 = new DataTable();

                    dt1 = ISS.DataAccess.DbHelper.ExecuteDataSetBySql("SheetConncetionKey", strSql).Tables[0];


                    //取到Sheet中的值   循环列

                    int i1 = 0;
                    for (int j = Context.Config.DataStartCol; j < Context.Config.DataEndCol + 1; j++)
                    {
                        for (int m = Context.Config.DataStartRow + 1; m < Context.Config.DataEndRow + 1; m++)
                        {
                           
                           if (endRows > Context.Config.DataStartRow + 1)
	                       {
                            string ss = Context.Worksheet.Cells[m, j].Type.ToString();

 if (Context.Worksheet.Cells.Columns[j].IsHidden)
                                continue;
                            if (Context.Worksheet.Cells[Context.Config.DataStartRow, j].StringValue.Trim().ToLower() == "name".ToLower())
                            {
                                //找到财务费用的行 赋值给j  13
                                continue;
                            }

                            if (ss == "IsNull")
                            {
                                continue;
                            }

                            DataColumn dc = dt1.Columns[i1];

                            if (!DataTypeHelper.IsCanConvert(Context.Worksheet.Cells[m, j].Type.ToString(), dt1.Columns[i1]) && Context.Worksheet.Cells[m, j].Type.ToString() != "IsNull")
                            {
                                errorList.Add(wb.Worksheets[i].Name + "单元格中" + (Convert.ToInt32(m) + 1) + "行" + Context.Worksheet.Cells[m, j].Name + "列" + "数据格式不匹配,内容为:" + Context.Worksheet.Cells[m, j].Value.ToString());

                            }
                        }
                        }

                        i1++;
                    }

 效果:

原文地址:https://www.cnblogs.com/sunliyuan/p/6796486.html