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"))
软件开发网 www.mscto.com
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"))
软件开发网 www.mscto.com 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"))
软件开发网 www.mscto.com 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))