问题描述
我的Web端是Php,连接数据都是在php页面中.本地端执行Sql语句的代码如下，但以下代码只能执行Insert语句,不能执行存储过程,请问怎么修改可以执行存储过程？？？PublicOverloadsSubInsertData(ByValaTblAsString)TryDimvReaderAsXml.XmlReaderMe.Clear(False)Me.gDb.DataSet=NewData.DataSetMe.gVar.Str=Me.gVar.Str.Substring(0,Me.gVar.Str.Length-1)Me.gDb.StrSQL="INSERT"&aTbl&"SET"&Me.gVar.StrMe.gDb.StrXML=Me.QueryInsert(Me.gDb.StrSQL)If(Me.gDb.StrXML.IndexOf("<table>")=-1)ThenMe.gDb.StrVlaue=Me.gDb.StrXMLElseIf(Me.gDb.StrXML<>"")ThenvReader=Xml.XmlReader.Create(NewSystem.IO.StringReader(Me.gDb.StrXML))Me.gDb.DataSet.ReadXml(vReader)Me.gDb.DataTable=Me.gDb.DataSet.Tables(Me.gDb.DataSet.Tables.Count-1)Me.gDb.DataTable.TableName="MyInsert"Me.gVar.RowAffected=Integer.Parse(Me.gDb.DataSet.Tables(0).Rows(0).Item("affected_rows").ToString)Me.gVar.Value=Integer.Parse(Me.gDb.DataSet.Tables(0).Rows(0).Item("insert_id").ToString)ElseEndIfCatchexAsExceptionMe.gVar.RowAffected=-1FinallyMe.gVar.RowTotal=Me.gVar.RowAffectedMe.gVar.Str=""EndTryEndSub