(版主: 无)

标题：浅谈一下数据库相关操作（二）

总置顶·置顶·精华·锁定·删除·移动·提升 广告位招租，广告代号：bbs_content_468_15
03-17 21:53
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.2; SV1; .NET CLR 1.1.4322)
h1j2h7 秀才
头衔 --
h1j2h7 注册 07-03-16
来自
浅谈一下数据库相关操作（二）
广告位招租，广告代号：bbs_content_468_60
如下这样，定义了一个创建和设置了一个完整的DataAdapter，虽然代码量有点大，不过很容易就能看懂： Me.OleDbSelectCommand1.CommandText = "SELECT BoundUserID, CanLogin, DefaultPostMode, InfCreateDateTime, UserBorn, UserC" & _
       "alling, UserCity, UserEduLevel, UserGender, UserIDCard, UserIncoming, UserInfID," & _
       " UserJob, UserMobilePhone, UserNextGet, UserPoint, UserPostAddress, UserPostCode" & _
       ", UserProvince, UserRealName, UserTel FROM UserInfo WHERE (UserInfID = 0)"
       Me.OleDbSelectCommand1.Connection = Me.connMain
       '
       'OleDbInsertCommand1
       '
       Me.OleDbInsertCommand1.CommandText = "INSERT INTO UserInfo(BoundUserID, CanLogin, DefaultPostMode, InfCreateDateTime, U" & _
       "serBorn, UserCalling, UserCity, UserEduLevel, UserGender, UserIDCard, UserIncomi" & _
       "ng, UserJob, UserMobilePhone, UserNextGet, UserPoint, UserPostAddress, UserPostC" & _
       "ode, UserProvince, UserRealName, UserTel) VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, " & _
       "?, ?, ?, ?, ?, ?, ?, ?, ?, ?)"
       Me.OleDbInsertCommand1.Connection = Me.connMain
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("BoundUserID", System.Data.OleDb.OleDbType.Integer, 0, "BoundUserID"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("CanLogin", System.Data.OleDb.OleDbType.VarWChar, 10, "CanLogin"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("DefaultPostMode", System.Data.OleDb.OleDbType.VarWChar, 50, "DefaultPostMode"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("InfCreateDateTime", System.Data.OleDb.OleDbType.DBTimeStamp, 0, "InfCreateDateTime"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserBorn", System.Data.OleDb.OleDbType.DBTimeStamp, 0, "UserBorn"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserCalling", System.Data.OleDb.OleDbType.VarWChar, 50, "UserCalling"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserCity", System.Data.OleDb.OleDbType.VarWChar, 50, "UserCity"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserEduLevel", System.Data.OleDb.OleDbType.VarWChar, 50, "UserEduLevel"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserGender", System.Data.OleDb.OleDbType.VarWChar, 50, "UserGender"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserIDCard", System.Data.OleDb.OleDbType.VarWChar, 50, "UserIDCard"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserIncoming", System.Data.OleDb.OleDbType.VarWChar, 50, "UserIncoming"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserJob", System.Data.OleDb.OleDbType.VarWChar, 50, "UserJob"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserMobilePhone", System.Data.OleDb.OleDbType.VarWChar, 50, "UserMobilePhone"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserNextGet", System.Data.OleDb.OleDbType.DBTimeStamp, 0, "UserNextGet"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserPoint", System.Data.OleDb.OleDbType.Integer, 0, "UserPoint"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserPostAddress", System.Data.OleDb.OleDbType.VarWChar, 50, "UserPostAddress"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserPostCode", System.Data.OleDb.OleDbType.VarWChar, 50, "UserPostCode"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserProvince", System.Data.OleDb.OleDbType.Integer, 0, "UserProvince"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserRealName", System.Data.OleDb.OleDbType.VarWChar, 50, "UserRealName"))
       Me.OleDbInsertCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserTel", System.Data.OleDb.OleDbType.VarWChar, 50, "UserTel"))
       '
       'OleDbUpdateCommand1
       '
       Me.OleDbUpdateCommand1.CommandText = "UPDATE UserInfo SET BoundUserID = ?, CanLogin = ?, DefaultPostMode = ?, InfCreate" & _
       "DateTime = ?, UserBorn = ?, UserCalling = ?, UserCity = ?, UserEduLevel = ?, Use" & _
       "rGender = ?, UserIDCard = ?, UserIncoming = ?, UserJob = ?, UserMobilePhone = ?," & _
       " UserNextGet = ?, UserPoint = ?, UserPostAddress = ?, UserPostCode = ?, UserProv" & _
       "ince = ?, UserRealName = ?, UserTel = ? WHERE (UserInfID = ?)"
       Me.OleDbUpdateCommand1.Connection = Me.connMain
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("BoundUserID", System.Data.OleDb.OleDbType.Integer, 0, "BoundUserID"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("CanLogin", System.Data.OleDb.OleDbType.VarWChar, 10, "CanLogin"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("DefaultPostMode", System.Data.OleDb.OleDbType.VarWChar, 50, "DefaultPostMode"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("InfCreateDateTime", System.Data.OleDb.OleDbType.DBTimeStamp, 0, "InfCreateDateTime"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserBorn", System.Data.OleDb.OleDbType.DBTimeStamp, 0, "UserBorn"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserCalling", System.Data.OleDb.OleDbType.VarWChar, 50, "UserCalling"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserCity", System.Data.OleDb.OleDbType.VarWChar, 50, "UserCity"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserEduLevel", System.Data.OleDb.OleDbType.VarWChar, 50, "UserEduLevel"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserGender", System.Data.OleDb.OleDbType.VarWChar, 50, "UserGender"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserIDCard", System.Data.OleDb.OleDbType.VarWChar, 50, "UserIDCard"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserIncoming", System.Data.OleDb.OleDbType.VarWChar, 50, "UserIncoming"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserJob", System.Data.OleDb.OleDbType.VarWChar, 50, "UserJob"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserMobilePhone", System.Data.OleDb.OleDbType.VarWChar, 50, "UserMobilePhone"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserNextGet", System.Data.OleDb.OleDbType.DBTimeStamp, 0, "UserNextGet"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserPoint", System.Data.OleDb.OleDbType.Integer, 0, "UserPoint"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserPostAddress", System.Data.OleDb.OleDbType.VarWChar, 50, "UserPostAddress"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserPostCode", System.Data.OleDb.OleDbType.VarWChar, 50, "UserPostCode"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserProvince", System.Data.OleDb.OleDbType.Integer, 0, "UserProvince"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserRealName", System.Data.OleDb.OleDbType.VarWChar, 50, "UserRealName"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("UserTel", System.Data.OleDb.OleDbType.VarWChar, 50, "UserTel"))
       Me.OleDbUpdateCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("Original_UserInfID", System.Data.OleDb.OleDbType.Integer, 0, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "UserInfID", System.Data.DataRowVersion.Original, Nothing))
       '
       'OleDbDeleteCommand1
       '
       Me.OleDbDeleteCommand1.CommandText = "DELETE FROM UserInfo WHERE (UserInfID = ?)"
       Me.OleDbDeleteCommand1.Connection = Me.connMain
       Me.OleDbDeleteCommand1.Parameters.Add(New System.Data.OleDb.OleDbParameter("Original_UserInfID", System.Data.OleDb.OleDbType.Integer, 0, System.Data.ParameterDirection.Input, False, CType(0, Byte), CType(0, Byte), "UserInfID", System.Data.DataRowVersion.Original, Nothing))

这里面着重设置了
接三
广告位招租，广告代号：bbs_content_468_60
60.177.97.* 楼主
标题
使用表情识别
使用UBB代码
使用个人签名		 广告位招租，广告代号：bbs_publish_125_125