Unable to find script library '/aspnet_client/system_web/1_0_3705_0/WebUIValidation.js'.Try
placing this file manually,or reinstall by running'aspnet_regiis -c'.页面加载的时候弹出一次,发送的时候会弹出一次.功能正常,就是不能输入中文,显示乱码.
请各位大哥帮我!
下面是我的代码:
<script language="vb" runat="server">
Dim userid=user.Identity.Name
dim username As string
sub Page_Load(sender As Object,e As EventArgs)
Dim Conn As OleDbConnection,Cmd As OleDbCommand
Dim Rd As OleDbDataReader,SQL As string
Dim Provider="Provider=Microsoft.Jet.OLEDB.4.0"
Dim Database="Data Source=" & Server.MapPath("db1.mdb")
Conn= New OleDbConnection(Provider & ";" & DataBase)
Conn.Open()
SQL="Select * from users where userid='" & userid & "'"
Cmd= New OleDbCommand(SQL,Conn)
Rd=Cmd.ExeCuteReader()
if Rd.Read() then
Session("username")=Rd.Item("Name")
Conn.Close()
else
Conn.Close()
Msg.Text="错误"
end if
end sub
sub Speak_Click(sender As Object,e As EventArgs)
Dim Conn As OleDbConnection,cmd As OleDbCommand
Dim Rd As OleDbDataReader,SQL As string
Dim Provider="Provider=Microsoft.Jet.OLEDB.4.0"
Dim Database="Data Source=" & server.MapPath("chatroom.mdb")
Conn= New OleDbConnection(Provider & ";" & Database)
Conn.Open()
SQL="Insert Into Chatroom(姓名,内容) VALUES(?,?)"
Cmd=New OleDbCommand(SQL,Conn)
Cmd.Parameters.Add(New OleDbParameter("@姓名",OleDbType.Char,50))
Cmd.Parameters.Add(New OleDbParameter("@内容",OleDbType.VarChar))
Cmd.Parameters("@姓名").Value=session("username")
Cmd.Parameters("@内容").Value= Word.text
Cmd.ExecuteNonQuery()
Msg.text="您的意见已经送出"
end sub
</script>
placing this file manually,or reinstall by running'aspnet_regiis -c'.页面加载的时候弹出一次,发送的时候会弹出一次.功能正常,就是不能输入中文,显示乱码.
请各位大哥帮我!
下面是我的代码:
<script language="vb" runat="server">
Dim userid=user.Identity.Name
dim username As string
sub Page_Load(sender As Object,e As EventArgs)
Dim Conn As OleDbConnection,Cmd As OleDbCommand
Dim Rd As OleDbDataReader,SQL As string
Dim Provider="Provider=Microsoft.Jet.OLEDB.4.0"
Dim Database="Data Source=" & Server.MapPath("db1.mdb")
Conn= New OleDbConnection(Provider & ";" & DataBase)
Conn.Open()
SQL="Select * from users where userid='" & userid & "'"
Cmd= New OleDbCommand(SQL,Conn)
Rd=Cmd.ExeCuteReader()
if Rd.Read() then
Session("username")=Rd.Item("Name")
Conn.Close()
else
Conn.Close()
Msg.Text="错误"
end if
end sub
sub Speak_Click(sender As Object,e As EventArgs)
Dim Conn As OleDbConnection,cmd As OleDbCommand
Dim Rd As OleDbDataReader,SQL As string
Dim Provider="Provider=Microsoft.Jet.OLEDB.4.0"
Dim Database="Data Source=" & server.MapPath("chatroom.mdb")
Conn= New OleDbConnection(Provider & ";" & Database)
Conn.Open()
SQL="Insert Into Chatroom(姓名,内容) VALUES(?,?)"
Cmd=New OleDbCommand(SQL,Conn)
Cmd.Parameters.Add(New OleDbParameter("@姓名",OleDbType.Char,50))
Cmd.Parameters.Add(New OleDbParameter("@内容",OleDbType.VarChar))
Cmd.Parameters("@姓名").Value=session("username")
Cmd.Parameters("@内容").Value= Word.text
Cmd.ExecuteNonQuery()
Msg.text="您的意见已经送出"
end sub
</script>
解决方案 »
- 无法定义事务,为何?
- |zyciis| 我生成word导出的时候 因为点了打开而不是保存时,以后他都是以网页打开的方式打开,但这时我要他为保存到本地,浏览器在哪里设置
- 发布网站程序的时候release版下有anycpu,.net,mixed platforms选哪个好?
- 请教各位大侠几个改乔客1.2版的问题,能帮我回答几个是几个,谢谢!
- 这个问题 何因?
- 在repeater中,当绑定的值为1时,显示成功,为2时显示失败,这该怎么做
- 异常详细信息: System.Runtime.InteropServices.SEHException: 外部组件发生异常。
- asp.net 中关于CheckBoxList显示选中的问题
- 初级菜鸟问题 哪位用过HHFeditor在线编辑器 2.0 .用时怎么读取里面的文章的内容?
- UpdatePanel中的button如何实现全局刷新
- asp.net怎么链接ORACLE数据库!
- ASP.Net中,我用的是Oracle数据库,如何进行参数化查询?????求救啊!!!!在线等
C:\WINDOWS\Microsoft.NET\Framework\v1.1.4322\aspnet_regiis -c
.net经常出这个问题,重新注册一下就好了。
好了...非常感谢大家的帮忙..