从字符串“"转换"输入“整数"无效. [英] Conversion from string " " to type 'Integer' is not valid.

问题描述

我遇到了错误:

InvalidCastException未通过用户代码处理

InvalidCastException was unhandled by user code

从字符串"UNITID，INSTINM，ADDR，CITY，STAB"的转换；键入"Integer"无效.

Conversion from string "UNITID, INSTNM, ADDR, CITY, STAB" to type 'Integer' is not valid.

暗 如 字符串 = "

Dim WFSDINSTITUTION As String =""

暗 如 新建 System.Data.SqlClient.

Dim WFSDSTRING As New System.Data.SqlClient.SqlConnection

WFSDSTRING.ConnectionString = "数据源= LED-SQL;初始目录= WorkforceSD_DEV;集成安全性= True"

WFSDSTRING.ConnectionString ="Data Source=LED-SQL;Initial Catalog=WorkforceSD_DEV;Integrated Security=True"

WFSDSTRING.Open()

WFSDSTRING.Open()

暗 如 字符串 = "提供程序= Microsoft.ACE.OLEDB.12.0;数据源= C:\ Documents and Settings \ CSchexnaydre \ Desktop \ TEST SHEETS \ Institution \ INST_TEST2010.csv; HDR = YES;"

Dim Institution As String ="Provider = Microsoft.ACE.OLEDB.12.0;Data Source=C:\Documents and Settings\CSchexnaydre\Desktop\TEST SHEETS\Institution\INST_TEST2010.csv;HDR=YES;"

使用 如 新建 System.Data.OleDb. OleDbConnection

Using INSTITUTIONCONNECTION As New System.Data.OleDb.OleDbConnection(Institution)

暗 如 新建 数据.

Dim INST_TABLE As New Data.DataTable()

INST_TABLE.Columns.Add( "UNITID"

INST_TABLE.Columns.Add("UNITID")

INST_TABLE.Columns.Add( INST_TABLE.Columns.Add(" )

INST_TABLE.Columns.Add("ADDR")

INST_TABLE.Columns.Add( "CITY" )

INST_TABLE.Columns.Add("CITY")

INST_TABLE.Columns.Add( "STABBR" )

INST_TABLE.Columns.Add("STABBR")

INST_TABLE.Columns.Add( "ZIP")

INST_TABLE.Columns.Add("ZIP")

INST_TABLE.Columns.Add( "FIPS" )

INST_TABLE.Columns.Add("FIPS")

INST_TABLE.Columns.Add( "OBEREG")

INST_TABLE.Columns.Add("OBEREG")

INST_TABLE.Columns.Add( "CHFNM")

INST_TABLE.Columns.Add("CHFNM")

INST_TABLE.Columns.Add( "CHFTITLE" )

INST_TABLE.Columns.Add("CHFTITLE")

INST_TABLE.Columns.Add( "GENTELE" )

INST_TABLE.Columns.Add("GENTELE")

INST_TABLE.Columns.Add( "ENI")

INST_TABLE.Columns.Add("ENI")

INST_TABLE.Columns.Add( "OPEID" )

INST_TABLE.Columns.Add("OPEID")

INST_TABLE.Columns.Add( "OPEFLAG" )

INST_TABLE.Columns.Add("OPEFLAG")

INST_TABLE.Columns.Add( "WEBADDR" )

INST_TABLE.Columns.Add("WEBADDR")

INST_TABLE.Columns.Add( "ADMINURL" )

INST_TABLE.Columns.Add("ADMINURL")

INST_TABLE.Columns.Add( "FAIDURL" )

INST_TABLE.Columns.Add("FAIDURL")

INST_TABLE.Columns.Add( "APPLURL" )

INST_TABLE.Columns.Add("APPLURL")

INST_TABLE.Columns.Add( "ICLEVEL" )

INST_TABLE.Columns.Add("ICLEVEL")

INST_TABLE.Columns.Add( "CONTROL" )

INST_TABLE.Columns.Add("CONTROL")

INST_TABLE.Columns.Add( "HLOFFER" )

INST_TABLE.Columns.Add("HLOFFER")

INST_TABLE.Columns.Add( "UGOFFER" )

INST_TABLE.Columns.Add("UGOFFER")

INST_TABLE.Columns.Add( "GROFFER" )

INST_TABLE.Columns.Add("GROFFER")

INST_TABLE.Columns.Add( "HDEGOFR1" )

INST_TABLE.Columns.Add("HDEGOFR1")

INST_TABLE.Columns.Add( "DEGGRANT" )

INST_TABLE.Columns.Add("DEGGRANT")

INST_TABLE.Columns.Add( "HBCU" )

INST_TABLE.Columns.Add("HBCU")

INST_TABLE.Columns.Add( 医院" )

INST_TABLE.Columns.Add("HOSPITAL")

INST_TABLE.Columns.Add( "MEDICAL" )

INST_TABLE.Columns.Add("MEDICAL")

INST_TABLE.Columns.Add( "TRIBAL" )

INST_TABLE.Columns.Add("TRIBAL")

INST_TABLE.Columns.Add( "LOCALE" )

INST_TABLE.Columns.Add("LOCALE")

INST_TABLE.Columns.Add( "OPENPUBL" )

INST_TABLE.Columns.Add("OPENPUBL")

INST_TABLE.Columns.Add( "ACT" )

INST_TABLE.Columns.Add("ACT")

INST_TABLE.Columns.Add( "NEWID" )

INST_TABLE.Columns.Add("NEWID")

INST_TABLE.Columns.Add( "DEATHYR" )

INST_TABLE.Columns.Add("DEATHYR")

INST_TABLE.Columns.Add( "CLOSEDAT" )

INST_TABLE.Columns.Add("CLOSEDAT")

INST_TABLE.Columns.Add( "CYACTIVE" )

INST_TABLE.Columns.Add("CYACTIVE")

INST_TABLE.Columns.Add( "POSTSEC" )

INST_TABLE.Columns.Add("POSTSEC")

INST_TABLE.Columns.Add( "PSEFLAG" )

INST_TABLE.Columns.Add("PSEFLAG")

INST_TABLE.Columns.Add( "PSET4FLG" )

INST_TABLE.Columns.Add("PSET4FLG")

INST_TABLE.Columns.Add( "RPTMTH" )

INST_TABLE.Columns.Add("RPTMTH")

INST_TABLE.Columns.Add( "IALIAS" )

INST_TABLE.Columns.Add("IALIAS")

INST_TABLE.Columns.Add( "INSTCAT" )

INST_TABLE.Columns.Add("INSTCAT")

INST_TABLE.Columns.Add( "CCBASIC" )

INST_TABLE.Columns.Add("CCBASIC")

INST_TABLE.Columns.Add( "CCIPUG" )

INST_TABLE.Columns.Add("CCIPUG")

INST_TABLE.Columns.Add("CCIPGRAD")

INST_TABLE.Columns.Add("CCIPGRAD")

INST_TABLE.Columns.Add("CCUGPROF")

INST_TABLE.Columns.Add("CCUGPROF")

INST_TABLE.Columns.Add("CCENRPRF")

INST_TABLE.Columns.Add("CCENRPRF")

INST_TABLE.Columns.Add("CCSIZSET")

INST_TABLE.Columns.Add("CCSIZSET")

INST_TABLE.Columns.Add("CARNEGIE")

INST_TABLE.Columns.Add("CARNEGIE")

INST_TABLE.Columns.Add("TENURSYS")

INST_TABLE.Columns.Add("TENURSYS")

INST_TABLE.Columns.Add("LANDGRNT")

INST_TABLE.Columns.Add("LANDGRNT")

INST_TABLE.Columns.Add("INSTSIZE")

INST_TABLE.Columns.Add("INSTSIZE")

INST_TABLE.Columns.Add("CBSA")

INST_TABLE.Columns.Add("CBSA")

INST_TABLE.Columns.Add("CBSATYPE")

INST_TABLE.Columns.Add("CBSATYPE")

INST_TABLE.Columns.Add("CSA")

INST_TABLE.Columns.Add("CSA")

INST_TABLE.Columns.Add("NECTA")

INST_TABLE.Columns.Add("NECTA")

INST_TABLE.Columns.Add("F1SYSTYP")

INST_TABLE.Columns.Add("F1SYSTYP")

INST_TABLE.Columns.Add("F1SYSNAM")

INST_TABLE.Columns.Add("F1SYSNAM")

INST_TABLE.Columns.Add("FAXTELE")

INST_TABLE.Columns.Add("FAXTELE")

Dim INST_TEST2010 As New FileIO.TextFieldParser("C:\Documents and Settings\CSchexnaydre\Desktop\TEST SHEETS\Institution\INST_TEST2010.csv")

Dim INST_TEST2010 As New FileIO.TextFieldParser("C:\Documents and Settings\CSchexnaydre\Desktop\TEST SHEETS\Institution\INST_TEST2010.csv")

INST_TEST2010.Delimiters =New String() {","}

INST_TEST2010.Delimiters =New String() {","}

INST_TEST2010.HasFieldsEnclosedInQuotes =True

INST_TEST2010.HasFieldsEnclosedInQuotes =True

INST_TEST2010.TrimWhiteSpace =True

INST_TEST2010.TrimWhiteSpace =True

INST_TEST2010.ReadLine()

INST_TEST2010.ReadLine()

Do Until INST_TEST2010.EndOfData = True

Do Until INST_TEST2010.EndOfData = True

INST_TABLE.Rows.Add(INST_TEST2010.ReadFields("UNITID, INSTNM, ADDR, CITY, STABBR, ZIP, FIPS, OBEREG, CHFNM, CHFTITLE, GENTELE, EIN, OPEID, OPEFLAG, WEBADDR, ADMINURL, FAIDURL, APPLURL, ICLEVEL, CONTROL, HLOFFER, UGOFFER, GROFFER, HDEGOFR1, DEGGRANT, HBCU, HOSPITAL, MEDICAL, TRIBAL, LOCALE, OPENPUBL, ACT, NEWID, DEATHYR, CLOSEDAT, CYACTIVE, POSTSEC, PSEFLAG, PSET4FLG, RPTMTH, IALIAS, INSTCAT, CCBASIC, CCIPUG, CCIPGRAD, CCUGPROF, CCENRPRF, CCSIZSET, CARNEGIE, TENURSYS, LANDGRNT, INSTSIZE, CBSA, CBSATYPE, CSA, NECTA, F1SYSTYP, F1SYSNAM, FAXTELE"))

INST_TABLE.Rows.Add(INST_TEST2010.ReadFields("UNITID, INSTNM, ADDR, CITY, STABBR, ZIP, FIPS, OBEREG, CHFNM, CHFTITLE, GENTELE, EIN, OPEID, OPEFLAG, WEBADDR, ADMINURL, FAIDURL, APPLURL, ICLEVEL, CONTROL, HLOFFER, UGOFFER, GROFFER, HDEGOFR1, DEGGRANT, HBCU, HOSPITAL, MEDICAL, TRIBAL, LOCALE, OPENPUBL, ACT, NEWID, DEATHYR, CLOSEDAT, CYACTIVE, POSTSEC, PSEFLAG, PSET4FLG, RPTMTH, IALIAS, INSTCAT, CCBASIC, CCIPUG, CCIPGRAD, CCUGPROF, CCENRPRF, CCSIZSET, CARNEGIE, TENURSYS, LANDGRNT, INSTSIZE, CBSA, CBSATYPE, CSA, NECTA, F1SYSTYP, F1SYSNAM, FAXTELE"))

Loop

推荐答案

Define, that columns are of type integer:

Define, that columns are of type integer:

INST_TABLE.Columns.Add("UNITID", GetType(Integer))

这篇关于从字符串“"转换"输入“整数"无效.的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！