Olá! peritos,
I am sure que nós todos vimos a mensagem acima e geralmente seu consideravelmente desobstruído de onde o erro está vindo. Mas no código abaixo dele não é óbvio a mim, assim que eu preciso algum help.
Here sou o código: NC do
se não. NC do estado = do ConnectionState.Open Then
. Abrir () o strSelect não ofuscante de If
do fim do
como o strUCode não ofuscante do
da corda = do "" como a corda = o strLName não ofuscante de txtUCode.Text
como a corda = o strMI não ofuscante de txtLNameREQ.Text
como a corda = o strFName não ofuscante de txtMI.Text
como a corda = o txtFNameREQ.Text
strAdd1 não ofuscante como a corda = o txtAddress1REQ.Text
strAdd2 não ofuscante como a corda = strCity não ofuscante de txtAddress2.Text
como a corda = o strST não ofuscante de txtCityREQ.Text
como a corda = strZip não ofuscante de txtSTREQ.Text
como a corda = o txtZipREQ.Text
strPH1 não ofuscante como a corda = o txtPhone1REQ.Text
strPH2 não ofuscante como a corda = o não ofuscante de txtPhone2.Text
strCred como a corda = cbUserType.SelectedItem
escurecem o strID como a corda = o txtID.Text
escurecem o dtExpire como bitInitLogin não ofuscante do
do DateTime = do CDate (txtExpire.Text) como bôoleano = strProvType não ofuscante de True
como a corda = de _
da disciplina de “U " strDisc não ofuscante do
como a corda = o sqlDA não ofuscante de txtDiscREQ.Text
como strSelect novo do
de SqlClient.SqlDataAdapter (strSelect, NC) = “INSERÇÃO no tblUsersData UserCode, LName, FName, MI, MAddr1, MAddr2, MCity, MST, MZip, WPhone1, WPhone2, credenciais, identificação, expiração, Prov_Type, initial_login,” & VALORES os “(@UserCode, @LName, @FName, @MI, @MAddr1, @MAddr2, @MCity, @MST, @MZip, @WPhone1, @WPhone2, @Credential, @ID, @Expiration, @Prov_Type, @initial_login,
do @MST” do @MCity”, o strCity) do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue
sqlDA.InsertCommand.Parameters.AddWithValue do @Disc) do “(“@UserCode”, strUCode do ) (“@LName”, strLName) (“@FName”, strFName) (“@MI”, strMI) (“@MAddr1”, strAdd1) (“@MAddr2”, strAdd2) (““(, o strST)
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue do
sqlDA.InsertCommand.Parameters.AddWithValue de sqlDA.InsertCommand.Parameters.AddWithValue (“@MZip”, strZip) (“@WPhone1”, strPH1) (“@WPhone2”, strPH2) (“@Credential”, strCred) (“@ID”, strID) (“@Expiration”, dtExpire) (do “ @Prov_Type ", strProvType) (“@initial_login”, bitInitLogin) (“@Disc”, strDisc)o
Try
sqlDA.SelectCommand.CommandText = prendedor do
do strSelect
sqlDA.SelectCommand.ExecuteNonQuery () erra como SqlClient.SqlException
MessageBox.Show (“um erro ocorreu em AddUser -” & erra. NC de Try
do fim do
da mensagem). O
This do fim () é a primeira vez que eu usei AddWithValue nos parâmetros, assim que eu não sou 100% na sintaxe apropriada mas eu acredito que está correta. Toda a ajuda seria apreciada, o
Jack
class= do
|
