Ã*ä ÇáÎØà Ý* ÇáßæÏ
<div>agr: ÇáÓáÇã Úá*ßã æÑÍãÉ Çááå æÈÑßÇÊå
.. ÃÑÌæ ãäßä ÊæÖ*Í ãßÇä ÇáÎØà Ý* ÇáßæÏ ÇáÊÇá* ÚÇÌáÇ ÈÇÑß Çááå Ý*ßã
ßæÏ ÈáÛÉ HTML:
Dim UpdStudentState1 As String
UpdStudentState1 = "Update info0 set schoolname=@schoolname, schooladdress=@schooladdress, schoolphone=@schoolphone, schoolmobile=@schoolmobile, building=@building, buildingtype=@buildingtype, FloorsNum=@FloorsNum, Squares=@Squares, SquaresNum=@SquaresNum, managername=@managername, managermobile=@managermobile, assist1name=@assist1name, assist1mobile=@assist1mobile, assist2name=@assist2name, noorpersonnelname=@noorpersonnelname, noorpersonnelmobile=@noorpersonnelmobile, Science labs=@Science labs, numberoflabs=@numberoflabs, lab1year=@lab1year, lab1area=@lab1area, Devices1num=@Devices1num, Type1=@Type1, lab2year=@lab2year, lab2area=@lab2area, Devices2num=@Devices2num, Type2=@Type2, compteacher=@compteacher, compteachermobile=@compteachermobile, compteacher1=@compteacher1, compteacher1mobile=@compteacher1mobile, compteacher2=@compteacher2, compteacher2mobile=@compteacher2mobile, numberofresources=@numberofresources, resourcesname=@resourcesname, resourcesmobile=@resourcesmobile, guardname=@guardname, guardphone=@guardphone, guard1name=@guard1name, guard1phone=@guard1phone where schoolid= '" & Me.lblPass.Text & "'"
Dim cmdUpdStdStat1 As New OleDbCommand(UpdStudentState1, connection)
|