无功补偿的作用:帮忙查错。
来源:百度文库 编辑:查人人中国名人网 时间:2024/04/20 16:14:30
<script language="vb" runat="server">
sub rq_click(sender as object,e as eventargs)
dim connStr As String
dim MyConn as oledbconnection
dim rd as oledbdatareader
dim com as OledbCommand
connstr="Provider = Microsoft.Jet.OLEDB.4.0;data source=E:\sample\公司办公管理信息系统\gsbgglxt.mdb"
myConn=new oledbconnection(connstr)
myConn.open()
dim sql as string = "select * FROM khzldj where 提交日期='20060308'"
com = new OledbCommand(sql,myconn)
rd=com.executereader()
至少一个参数没有被指定值。
datagrid1.datasource=rd
datagrid1.databind()
end sub
</script>
sub rq_click(sender as object,e as eventargs)
dim connStr As String
dim MyConn as oledbconnection
dim rd as oledbdatareader
dim com as OledbCommand
connstr="Provider = Microsoft.Jet.OLEDB.4.0;data source=E:\sample\公司办公管理信息系统\gsbgglxt.mdb"
myConn=new oledbconnection(connstr)
myConn.open()
dim sql as string = "select * FROM khzldj where 提交日期='20060308'"
com = new OledbCommand(sql,myconn)
rd=com.executereader()
至少一个参数没有被指定值。
datagrid1.datasource=rd
datagrid1.databind()
end sub
</script>
dim sql as string = "select * FROM khzldj where 提交日期='20060308'"
改为:
dim sql
sql = "select * FROM khzldj where 提交日期='20060308'"
定义时候的语法问题
要么不定义:
sql= "select * FROM khzldj where 提交日期='20060308'"
或者定义:
dim sql
sql= "select * FROM khzldj where 提交日期='20060308'"