case "3" pq.purge

case "4"

    number_=1

    number_to_=""

           For Each printJob In pq.PrintJobs

           set number_to_=Request.QueryString("number_doc")

                 if cint(number_to_)=number_ then

                 printJob.pause

                 end if

           number_=number_+1

           next

case "5"

    number_=1

    number_to_=""

           For Each printJob In pq.PrintJobs

           set number_to_=Request.QueryString("number_doc")

                 if cint(number_to_)=number_ then

                 printJob.resume

                 end if

           number_=number_+1

           next

case "6"

    number_=1

    number_to_=""

           For Each printJob In pq.PrintJobs

           set number_to_=Request.QueryString("number_doc")

                 if cint(number_to_)=number_ then

                 set del_docum=pq.printJobs

                 del_docum.Remove cstr(printJob.name)

                 end if

           number_=number_+1

           next

end select

change_status=0

status_printer=pq.status

select case status_printer

case "0" status_P="<img src=images3normal.jpg border=0>"

case "1" status_P="<img src=images2pause.jpg border=0>"

case "18" status_P="<img src=images1error.jpg border=0>"

end select

sum_jobs="<Table width=100% > <TR> <Center> <TD><h5>Операции</td><td><B><H5> Название документа </TD> <TD> <B> <H5> Пользователь </TD>  <TD> <H5> <B> Приоритет </TD> <TD> <H5> <B> Кол-во (стр) </TD> <TD> <B> <H5> Размер (Мб)</TD> <TD> <B> <H5> Состояние </TD></Center>"