本人在做一个新闻内容的模块的时候，发现如果内容在4K以上的字符串会出错，得到的内容会是乱码（也就是被自动截断），如果小于4K,那么就不会有问题。
原来采用了Varchar2的类型来存储，但发现后修改为Clob类型的也出现同样的问题，而且发现日志的错误是：System.Data.OracleClient.OracleException: ORA-01461: can bind a LONG value only for insert into a LONG column。
由于Clob类型是可以存放很大类型的文本数据的，不会是数据库字段容量不够，因此检查插入和更新的C#代码，发现原来的代码是这样的:
{
bool result = false ;
string fields = "" ; // 字段名
string vals = "" ; // 字段值
if ( recordField == null || recordField.Count < 1 )
{
return result;
}
List < OracleParameter > paramList = new List < OracleParameter > ();
IEnumerator eKeys = recordField.Keys.GetEnumerator();
while ( eKeys.MoveNext() )
{
string field = eKeys.Current.ToString();
fields += field + " , " ;
if ( ! string .IsNullOrEmpty(seqField) && ! string .IsNullOrEmpty(seqName)
&& (field.ToUpper() == seqField.ToUpper()))
{
vals += string .Format( " {0}.NextVal, " , seqName);
}
else
{
vals += string .Format( " :{0}, " , field);
object val = recordField[eKeys.Current.ToString()];
paramList.Add( new OracleParameter( " : " + field, val));
}
}
fields = fields.Trim( ' , ' ); // 除去前后的逗号
vals = vals.Trim( ' , ' ); // 除去前后的逗号
string sql = string .Format( " INSERT INTO {0} ({1}) VALUES ({2}) " , targetTable, fields, vals);
Database db = DatabaseFactory.CreateDatabase();
DbCommand command = db.GetSqlStringCommand(sql);
command.Parameters.AddRange(paramList.ToArray());
if ( trans != null )
{
result = db.ExecuteNonQuery(command, trans) > 0 ;
}
else
{
result = db.ExecuteNonQuery(command) > 0 ;
}
return result;
}
重要的地方就是我使用了该行代码：
猜想可能是由于这行代码的问题导致，因此修改参数化的Oracle参数变量代码为另外一个种指定对象类型的方式：
a.Value = val;
paramList.Add(a);
验证通过，发现再长的内容，写入也是正常的，不会出错和出现的截断乱码。由于第一种忽略了Oracle参数类型，就是为了适应各种类型对象的参数化构造，实现统一添加参数化内容的，由于超长的字符内容会出现问题，因此只好修改基类操作的添加参数代码，添加一个条件分支作为处理。调整后的插入代码如下（更新代码类似操作）：
{
bool result = false ;
string fields = "" ; // 字段名
string vals = "" ; // 字段值
if ( recordField == null || recordField.Count < 1 )
{
return result;
}
List < OracleParameter > paramList = new List < OracleParameter > ();
IEnumerator eKeys = recordField.Keys.GetEnumerator();
while ( eKeys.MoveNext() )
{
string field = eKeys.Current.ToString();
fields += field + " , " ;
if ( ! string .IsNullOrEmpty(seqField) && ! string .IsNullOrEmpty(seqName)
&& (field.ToUpper() == seqField.ToUpper()))
{
vals += string .Format( " {0}.NextVal, " , seqName);
}
else
{
vals += string .Format( " :{0}, " , field);
object val = recordField[eKeys.Current.ToString()];
if (val.ToString().Length >= 4000 )
{
OracleParameter a = new OracleParameter( " : " + field, OracleType.Clob, val.ToString().Length);
a.Value = val;
paramList.Add(a);
}
else
{
paramList.Add( new OracleParameter( " : " + field, val));
}
}
}
fields = fields.Trim( ' , ' ); // 除去前后的逗号
vals = vals.Trim( ' , ' ); // 除去前后的逗号
string sql = string .Format( " INSERT INTO {0} ({1}) VALUES ({2}) " , targetTable, fields, vals);
Database db = DatabaseFactory.CreateDatabase();
DbCommand command = db.GetSqlStringCommand(sql);
command.Parameters.AddRange(paramList.ToArray());
if ( trans != null )
{
result = db.ExecuteNonQuery(command, trans) > 0 ;
}
else
{
result = db.ExecuteNonQuery(command) > 0 ;
}
return result;
}
这样，就可以在使用代码生成工具Database2Sharp(http://www.iqidi.com/database2sharp.htm)生成的Oracle代码中，不需要改变任何地方，只需要调整BaseDAL的基类中Insert和Update中的部分内容，就可以了。
本文转自博客园伍华聪的博客，原文链接：Oracle中对超长内容的处理，避免出现can bind a LONG value only for insert into a LONG column错误，如需转载请自行联系原博主。
