ألسلام عليكم
اخواني انا عندي فورم اشتراك في اميل يعني
بيدخل بيانات على الداتا بيس
بس بدي اتاكد انه اليوزر نيم غير موجود من قبل اي انه غيلر مستخدم
الكود لادخال البيانات
Dim com As New SqlCommand
Dim pfn, pln, pgender, pmonth, pday, pyear, puser, ppass, prepass As SqlParameter
pfn = New SqlParameter("@fn", System.Data.SqlDbType.NVarChar)
pln = New SqlParameter("@ln", System.Data.SqlDbType.NVarChar)
pgender = New SqlParameter("@gender", System.Data.SqlDbType.NVarChar)
pyear = New SqlParameter("@year", System.Data.SqlDbType.NVarChar)
pmonth = New SqlParameter("@month", System.Data.SqlDbType.NVarChar)
'pday = New SqlParameter("@day", System.Data.SqlDbType.Int)
puser = New SqlParameter("@user", System.Data.SqlDbType.NVarChar)
ppass = New SqlParameter("@pass", System.Data.SqlDbType.NVarChar)
prepass = New SqlParameter("@repass", System.Data.SqlDbType.NVarChar)
pfn.Value = t1.Text
pln.Value = t2.Text
pgender.Value = dd1.SelectedItem.Text
pyear.Value = t3.Text
pmonth.Value = dd2.SelectedItem.Text
'pday.Value = dd3.SelectedItem.Text
puser.Value = t4.Text
ppass.Value = t5.Text
prepass.Value = t6.Text
com.Parameters.Add(pfn)
com.Parameters.Add(pln)
com.Parameters.Add(pgender)
com.Parameters.Add(pyear)
com.Parameters.Add(pmonth)
' com.Parameters.Add(pday)
com.Parameters.Add(puser)
com.Parameters.Add(ppass)
com.Parameters.Add(prepass)
con.Open()
com.Connection = con
com.CommandText = "insert into member(fname,lname,gender,year,month,username,password,repassword)values " _
& "(@fn,@ln,@gender,@year,@month,@user,@pass,@repass) "
com.ExecuteNonQuery()
con.Close()
Response.Redirect("wellcome.aspx")


