Рекомендуется: два интересных конструкции счетчиков для посетителей Как незаменимая часть веб -сайта, счетчик для посетителей может не только записывать количество раз, сколько раз посещается веб -сайт, но и улучшить веселье и видимость веб -страницы с помощью яркого и интересного дизайна, что заставило посетителя счетчика ландшафтом в Интернете страница. Ниже приведены два легких дизайнерских развлечений
Когда я делал программу для клиента, я вдруг столкнулся с проблемой, как правильно воспроизводить видео -формат в отправленном URL, когда пользователь отправил файл воспроизведения видео на странице продукта ... Я был в депрессии на некоторое время И подумал об этом.
Идея состоит в том, чтобы сначала получить тип файла и выбрать разные коды веб -плееров в соответствии с типом ... от трех до пяти до двух ... в то же время, для повторного использования кода в будущем была общая функция вызова была написано, чтобы облегчить будущее.
Исходный код теперь опубликован следующим образом:
| Ниже приведено цитируемое содержание: Sub Selplay (Strurl, Strwidth, Strheight) Dim Exts, Isext Если Strurl <> Then Then isext = lcase (mid (strurl, instrrev (strurl ,.) 1)) Еще isext = Конец, если Exts = avi, wmv, asf, mov, rm, ram Если instr (exts, isext) = 0, тогда Response.write незаконной видеофайл Еще Выберите случай Isext CASE AVI, WMV, ASF, MOV Response.write <embed id = mediaPlayer src = & strurl & width = & strwidth & height = & strheight & loop = false autostart = true> </embed> Case Mov, RM, Ram Response.Write <Object Height = & strheight & width = & strwidth & classid = clsid: cfcdaa03-8be4-11cf-b84b-0020afbbccfa> Response.write <param name = _extentx value = 12700> Response.write <param name = _extenty value = 9525> Response.write <param name = autostart value = -1> Response.write <param name = shuffle value = 0> Response.write <param name = prefetch value = 0> Response.write <param name = nolabels value = 0> Response.write <param name = src value = & strurl &> Response.write <param name = controls value = imagewindow> Response.write <param name = console value = clip> Response.write <param name = loop value = 0> Response.write <param name = numloop value = 0> Response.write <param name = center value = 0> Response.write <param name = saneversepect value = 0> Ответ. Response.write </object> Response.write <br> Response.write <Высота объекта = 32 width = & strwidth & classid = clsid: cfcdaa03-8be4-11cf-b84b-0020afbbccfa> Response.write <param name = _extentx value = 12700> Response.write <param name = _extenty value = 847> Response.write <param name = autostart value = 0> Response.write <param name = shuffle value = 0> Response.write <param name = prefetch value = 0> Response.write <param name = nolabels value = 0> Response.write <param name = controls value = controlPanel, StatusBar> Response.write <param name = console value = clip> Response.write <param name = loop value = 0> Response.write <param name = numloop value = 0> Response.write <param name = center value = 0> Response.write <param name = saneversepect value = 0> Ответ. Response.write </object> Конец выбора Конец, если Конец суб |
Метод вызова:
| Ниже приведено цитируемое содержание: Позвоните в Селэплей (DVURL, 280 220) |
Share: Рекомендуется: резюме обычно используемого исходного кода для начинающих ASP 1. Получить системное время: <%= now ()%> 2. Получить IP, используемый для посещения: <%= request.servervariables (remote_host)%> 3.