actually i my first page i have only one dropdownlist,in that dropdownlist i am company names,if i select the particular company name,it will move to second page,and create a empcode automatically,it works fine.but in the second page during the runtime,and when the user enter the values for empname,panno,phno in the second page,in the second page i have a dropdownlist for city ,if the user select the city name as MUMBAI,the empcode will automatically changed as TCS/MUM/001 how?pls help,,this is my code
in 1st page dropdownlist with 3 company names like TS,CTS,WiPRo
in second page.....page load
cmd = New SqlCommand("select count(*)from employeeregistration", connection)
connection.Open()
count = Convert.ToInt16(cmd.ExecuteScalar()) + 1
txtempid.Text = "OPA" & count
connection.Close()
txtfname.Focus()
in the second page ,save button option
cmd = New SqlCommand("insert into employeeregistration(empid,fname,lname,paddress,peraddress,dob,gender,phoneno,panno,email,emcno,marstatus,bgroup,country,city,state,compname,desig,dept,doj,totsalary,gsalary,hra,conveyance,oallowance,mallowance,pfund,ptax,netpayable)values(@empid,@fname,@lname,@paddress,@peraddress,@dob,@gender,@phoneno,@panno,@email,@emcno,@marstatus,@bgroup,@country,@city,@state,@compname,@desig,@dept,@doj,@totsalary,@gsalary,@hra,@conveyance,@oallowance,@mallowance,@pfund,@ptax,@netpayable)", connection)
connection.Open()
cmd.Parameters.Add("empid", SqlDbType.VarChar).Value = txtempid.Text.Trim
cmd.Parameters.Add("fname", SqlDbType.VarChar).Value = txtfname.Text.Trim
cmd.Parameters.Add("lname", SqlDbType.VarChar).Value = txtlname.Text.Trim
cmd.Parameters.Add("paddress", SqlDbType.VarChar).Value = txtpraddress.Text.Trim
cmd.Parameters.Add("peraddress", SqlDbType.VarChar).Value = txtperaddress.Text.Trim
cmd.Parameters.Add("dob", SqlDbType.VarChar).Value = txtdob.Text.Trim
cmd.Parameters.Add("gender", SqlDbType.VarChar).Value = txtgender.Text
cmd.Parameters.Add("phoneno", SqlDbType.VarChar).Value = txtphno.Text.Trim
cmd.Parameters.Add("panno", SqlDbType.VarChar).Value = txtpanno.Text.Trim
cmd.Parameters.Add("email", SqlDbType.VarChar).Value = txtemail.Text.Trim
cmd.Parameters.Add("emcno", SqlDbType.VarChar).Value = txtemcno.Text.Trim
cmd.Parameters.Add("marstatus", SqlDbType.VarChar).Value = txtmastatus.Text.Trim
cmd.Parameters.Add("bgroup", SqlDbType.VarChar).Value = txtbgroup.Text
cmd.Parameters.Add("country", SqlDbType.VarChar).Value = txtcountry.Text.Trim
cmd.Parameters.Add("city", SqlDbType.VarChar).Value = txtcity.Text
Dim a, b As String
If Page.IsPostBack Then
Session("txtempid.text") = txtempid.Text
a = Session("txtempid.text")
b = a + "\" + txtcity.SelectedValue
txtempid.Text = b
End If
cmd.Parameters.Add("state", SqlDbType.VarChar).Value = txtstate.Text
cmd.Parameters.Add("compname", SqlDbType.VarChar).Value = txtcompname.Text
cmd.Parameters.Add("desig", SqlDbType.VarChar).Value = txtdesig.Text
cmd.Parameters.Add("dept", SqlDbType.VarChar).Value = txtdept.Text
cmd.Parameters.Add("doj", SqlDbType.VarChar).Value = txtdoj.Text.Trim
cmd.Parameters.Add("totsalary", SqlDbType.Int).Value = txttotsalary.Text.Trim
cmd.Parameters.Add("gsalary", SqlDbType.Int).Value = txtgsalary.Text.Trim
cmd.Parameters.Add("hra", SqlDbType.Int).Value = txthra.Text
cmd.Parameters.Add("conveyance", SqlDbType.Int).Value = txtconveyance.Text.Trim
cmd.Parameters.Add("oallowance", SqlDbType.Int).Value = txtoallowance.Text.Trim
cmd.Parameters.Add("mallowance", SqlDbType.Int).Value = txtmallowance.Text.Trim
cmd.Parameters.Add("pfund", SqlDbType.Int).Value = txtpfund.Text.Trim
cmd.Parameters.Add("ptax", SqlDbType.Int).Value = txtptax.Text.Trim
cmd.Parameters.Add("netpayable", SqlDbType.Int).Value = txtnpayable.Text.Trim
cmd.ExecuteNonQuery()
ClientScript.RegisterStartupScript(Page.[GetType](), "insert", "<script language='javascript'>alert('record inserted')</script>")
Session.Clear()
Session.Abandon()