Главная страница>Учебник по сетевому программированию>Учебное пособие по ASP

ASP вынуждено обновить веб -страницы и код экземпляра адреса файла судьи

Автор：Eve Cole Время обновления：2025-02-27 14:48:02

Эта статья в основном представляет ASP насильственное обновление веб -страниц и оценки кода экземпляра адреса файла.

Принудительно обновить веб -страницу

  1. ＜%
  2. «Обязательное обновление кода случайной проверки
  3. 'Пусть код случайной проверки будет автоматически обновляться каждый раз, когда нажата кнопка на задней части IE,
  4. Response.expires = -1
  5. Response.addheaderpragma, без кэша
  6. Response.addheadercache-Control, без магазина
  7. %＞

Определите, действителен ли файл адрес

  1. ＜%
  2. Response.write ()
  3. OnerRorResumenext
  4. DimThisurl, Thistext
  5. ThisURL = запрос (ThisURL) 'Определяет адрес файла (документ не-HTML формата)!
  6. ifThisurl = then
  7. Response.write (сначала введите адрес файла!)
  8. Response.end
  9. Эндиф
  10. FunctionObjxmlhttp (xmlurl)
  11. OnerRorResumenext
  12. SetObjxml = createObject (microsoft.xmlhttp)
  13. objxml.openget, xmlurl, false
  14. objxml.setrequestheadercontent-type, приложение/x-www-form-urlencoded
  15. objxml.send
  16. objxmlhttp = objxml.responsebody
  17. Iferrthen
  18. Err.clear
  19. Response.write (не удалось установить соединение, файл не существует или есть сетевая проблема!;; Ошибка Причина: & err.description &!)
  20. Response.end
  21. Эндиф
  22. Конечная функция
  23. Functionbytes2bstr (VIN)
  24. strreturn =
  25. Fori = 1tolenb (vin)
  26. ThisChode = ASCB (MIDB (VIN, I, 1))
  27. IfThischarcode <& H80Then
  28. strreturn = strreturn & chr (this charcode)
  29. Еще
  30. NextChode = ASCB (MIDB (VIN, I+1,1)))
  31. strreturn = strreturn & chr (clng (thisChode)*& h100+cint (nextcharcode))
  32. i = i+1
  33. Эндиф
  34. Следующий
  35. Bytes2bstr = strreturn
  36. Конечная функция
  37. thisurl2 = split (thisurl ,,)
  38. Foreachiiinthisurl2
  39. thistext = bytes2bstr (objxmlhttp (ii))
  40. ifinstr (thistext,) <> 0then
  41. Response.write (& ii & ×
  42. )
  43. Еще
  44. Response.write (& ii & √
  45. )
  46. Эндиф
  47. Следующий
  48. Iferrthen
  49. Err.clear
  50. Response.write (я столкнулся с несчастным случаем!; Ошибка Причина: & err.description &!)
  51. Response.end
  52. Эндиф
  53. %＞

Выше приведено код для принудительного освещения веб -страниц и оценки файла.

Связанные статьи