SQL:statement is too long how to fix it

Iam reading text file oledb provider in that select code that contains several variable like date,stockist,filepath,manufacturename(i get manufaturename in string "strManuFacture" If lenth of that strManuFacture exceeds 15000 i get that error compiled code too long like that

strManuFacture string i contains n number of manufactures too in that case i getting this error

If its short no issuses

code for referral

ElseIf fileinfo.Extension.ToUpper = ".DBF" Then

If strManuFacture.Trim <> "" Then

Dim oConn As New System.Data.OleDb.OleDbConnection()

oConn.ConnectionString = "provider=VFPOLEDB.1 ;data source=" & strFilePath & ";UID=;PWD=;"

oConn.Open()

Dim oCmd As System.Data.OleDb.OleDbCommand = oConn.CreateCommand()

oCmd.CommandText = "SELECT * FROM " & strFilePath & "\" & fileinfo.Name.ToString

//the line below is select statementin that strManuFacture present in last see that too

oCmd.CommandText = "SELECT '" & ddlAiocdCode.SelectedItem.ToString & "' as Stockist, '" & strDate(0) & "/" & strDate(1) & "/" & strDate(2) & "' as strDate,ITEM_CODE,transform(ITEM_NAME)+ '' + transform(PACK_SIZE),0 as SPR_PTR,SALE_QTY+BON_QTY-SRET_QTY,CL_BAL FROM " & strFilePath & "\" & fileinfo.Name.ToString & " where ITEM_NAME is not null and Manu_Name in (" & strManuFacture & ")"

dtbBankStmt = New DataTable

dtbBankStmt.Load(oCmd.ExecuteReader())

oConn.Close()

End If

2 Replies

Know the answer? Post it — somebody with the same question will find it here.

prabhu p10y ago
Hi
Iam reading text file oledb provider in that select code that contains several variable like date,stockist,filepath,manufacturename(i get manufaturename in string "strManuFacture" If lenth of that strManuFacture exceeds 15000 i get that error compiled code too long like that
strManuFacture string i contains n number of manufactures too in that case i getting this error
If its short no issuses

code for referral
ElseIf fileinfo.Extension.ToUpper = ".DBF" Then
If strManuFacture.Trim <> "" Then

Dim oConn As New System.Data.OleDb.OleDbConnection()

oConn.ConnectionString = "provider=VFPOLEDB.1 ;data source=" & strFilePath & ";UID=;PWD=;"
oConn.Open()
Dim oCmd As System.Data.OleDb.OleDbCommand = oConn.CreateCommand()
oCmd.CommandText = "SELECT * FROM " & strFilePath & "\" & fileinfo.Name.ToString

//the line below is select statementin that strManuFacture present in last see that too
oCmd.CommandText = "SELECT '" & ddlAiocdCode.SelectedItem.ToString & "' as Stockist, '" & strDate(0) & "/" & strDate(1) & "/" & strDate(2) & "' as strDate,ITEM_CODE,transform(ITEM_NAME)+ '' + transform(PACK_SIZE),0 as SPR_PTR,SALE_QTY+BON_QTY-SRET_QTY,CL_BAL FROM " & strFilePath & "\" & fileinfo.Name.ToString & " where ITEM_NAME is not null and Manu_Name in (" & strManuFacture & ")"

//

dtbBankStmt = New DataTable
dtbBankStmt.Load(oCmd.ExecuteReader())
oConn.Close()
End If

0
Ranjit Powar10y ago
Can you share your query.
0