这是另外张帖子http://community.csdn.net/Expert/topic/4278/4278299.xml?temp=.5989038求大虾解答.
下面的是我的文件. 出错主要是在 Server.mappath()这里
'====== form.aspx =====
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub Private Sub Button1_ServerClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ServerClick
'建立实例
Dim ObjAddInfo As New Taojin.FormSqlCmd
'
ObjAddInfo.addinfo(StrUser.Value, UsrChgPay.Value, ReqChgPay.Value, _
TxtUsrInfo.Value, IntUsrCme.Value, IntReqCme.Value)
StrLabInFo.Text = "加入数据成功!"
End Sub
' ========= End ===========
' ============ FormSqlCmd 类文件 ===============
Public Class FormSqlCmd
Dim StrConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" ****'就这里不知道怎么写了。***
' Server.MapPath("data/Tj_data.mdb") 应该放哪儿? Dim ObjConn As OleDb.OleDbConnection = New OleDb.OleDbConnection(StrConn)
Dim ObjCommand As New OleDb.OleDbCommand
'加入数据操作
Function addinfo(ByVal StrUser As String, ByVal StrUcp As String, ByVal StrRcp As String, _
ByVal StrTxt As String, ByVal IntUsrCme As String, ByVal IntReqCme As String)
Dim Sql As String = "insert into TxtInformation Values('" + StrUser + "','" + StrUcp + "','" + StrRcp + "','" + StrTxt + "','" + IntUsrCme + "','" + IntReqCme + "')"
ObjConn.Open()
ObjCommand.Connection = ObjConn
Try
ObjCommand.CommandText = Sql
ObjCommand.ExecuteNonQuery()
Catch ex As Exception
Return False
End Try
End Function
Sub FormSqlCmd(ByVal StrConn As String) '初始化
End Sub
End Class
================ End ======================麻烦各位大虾帮忙看看了.
下面的是我的文件. 出错主要是在 Server.mappath()这里
'====== form.aspx =====
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
End Sub Private Sub Button1_ServerClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ServerClick
'建立实例
Dim ObjAddInfo As New Taojin.FormSqlCmd
'
ObjAddInfo.addinfo(StrUser.Value, UsrChgPay.Value, ReqChgPay.Value, _
TxtUsrInfo.Value, IntUsrCme.Value, IntReqCme.Value)
StrLabInFo.Text = "加入数据成功!"
End Sub
' ========= End ===========
' ============ FormSqlCmd 类文件 ===============
Public Class FormSqlCmd
Dim StrConn As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" ****'就这里不知道怎么写了。***
' Server.MapPath("data/Tj_data.mdb") 应该放哪儿? Dim ObjConn As OleDb.OleDbConnection = New OleDb.OleDbConnection(StrConn)
Dim ObjCommand As New OleDb.OleDbCommand
'加入数据操作
Function addinfo(ByVal StrUser As String, ByVal StrUcp As String, ByVal StrRcp As String, _
ByVal StrTxt As String, ByVal IntUsrCme As String, ByVal IntReqCme As String)
Dim Sql As String = "insert into TxtInformation Values('" + StrUser + "','" + StrUcp + "','" + StrRcp + "','" + StrTxt + "','" + IntUsrCme + "','" + IntReqCme + "')"
ObjConn.Open()
ObjCommand.Connection = ObjConn
Try
ObjCommand.CommandText = Sql
ObjCommand.ExecuteNonQuery()
Catch ex As Exception
Return False
End Try
End Function
Sub FormSqlCmd(ByVal StrConn As String) '初始化
End Sub
End Class
================ End ======================麻烦各位大虾帮忙看看了.
解决方案 »
- 请教页面设计问题:类似office的动态菜单,要不要采用iframe?
- 页面怎么验证?
- CSBlogV2_B051124发布,欢迎下载使用
- 雪地跪求方案,如何将excel在导入数据库前实现预览并选择导入
- 数据绑定问题???
- net 中怎么能让图片随着windows 窗体缩放?
- 如何在数据库里读出二进制文档,显示到WEB页面上!谢谢
- 怎么控制数据库中记录的位置?
- session应用问题
- 请教怎么写一个快递单打印程序啊,比如圆通速递单的打印
- 我的.net建不了web项目,系统报错:http/1.0 403 Forbidden
- 关于ASP。NET生成静态的问题(急需要源码,如果没有源码,介绍得越详细越好)
=========================================================================adventure007(adventure):FormSqlCmd你这个可定是找不到server.mappth的!没有继承page类!
不要在封装的类中具体出现文件名,等你调用的时候传入实际的参数不久ok了吗=========================================================================有人知道怎么调用吗?
只需要asp.net用户可以控制就可以了