Вход на хостинг
IT-новости
20.04.2016 iPhone 2017 года поместят в водонепроницаемый корпус из стекла
Линейка iPhone в новом году серьезно поменяется. В этом уверен аналитический исследователь Мин Чи Ку......
30.07.2015 Ищем уникальный контент для сайта
Ищем уникальный контент для сайта Без уникального контента Ваш сайт обречен на то, что его страницы......
number_docum=0
For Each printJob In pq.PrintJobs
status_pre=printJob.status
select case status_pre
case "0" status_="<img src=images3normal.jpg border=0>"
case "1" status_="<img src=images2pause.jpg border=0>"
case "18" status_="<img src=images1error.jpg border=0>"
end select
number_docum=number_docum+1
sum_jobs=sum_jobs & "<TR><TD width=60><h6><a href="&chr(34)&" view_printer.asp?Printer_to=" & printer_name_to & "&change_status=4&Number_Doc="&number_docum & chr(34)& " > <img src=imagesl2.jpg border=0></a> <a href="&chr(34)&" view_printer.asp?Printer_to=" & printer_name_to & "&change_status=5&Number_Doc="&number_docum & chr(34)& "><img src=imagesl1.jpg border=0></a> <a href="&chr(34)&" view_printer.asp?Printer_to=" & printer_name_to & "&change_status=6&Number_Doc="&number_docum & chr(34)& "><img src=imagesl3.jpg border=0></a></td></center> <td> <h6>" & printJob.Description & "</td><TD><h6>" & printJob.User & "</TD> <TD width=40> <h6>" & printJob.Priority &" </TD> <TD width=50><h6>" & printJob.TotalPages & " </TD><TD width=40><h6>" & round(printJob.Size/1000000,2) & " </TD> <TD width=50><h6>"& status_ & "</TD>"
Next
s1="<center><b> <H4>" & printer_name & "</b></center><Br> <Table width=100% > <tr> <td> <h5> Описание: <Br></td> <td colspan=3> <h6>"& descrits_enum & "<Br></td></tr> <tr><td><b><h5> Расположение:</b><Br></td> <td><h6>" & location_name & "<Br></td> <td><h5>"
s2="<b> Драйвер: </b><Br></td> <td><h6>" & driver_name & "<Br></td> </tr> <tr> <td> <h5> <b> Сервер: </b> <Br></td> <td> <h6>" & server_name & "<Br></td> <td><b><h5> Версия: </b><Br></td> <td> <h6>" & driver_version & "<Br></td></tr> <tr><td><h5><b> Порт: </b><Br></td> <td> <h6>" & port_name & "<Br></td> <td> <h5>"
s3="<b> Тип данных: </b><Br></td> <td> <h6>"& pq.Datatype &"<Br></td></tr> <tr><td><b><h5> Язык: </b><Br></td> <td><h6>" & language_enum & "<Br></td> <td> <b><h5> Поддержка цвета: </b><Br></td> <td> <h6>" & support_color & "<Br></td> </tr> <tr> <td> <b><h5> Разрешение: </b><Br></td> <td><h6>" & resolution & " dpi <Br></td> <td><h5>"