Найдите исполнителя для вашего проекта прямо сейчас!
Разместите заказ на фриланс-бирже и предложения поступят уже через несколько минут.

код неотрабатывает строку

rs.Open strsql, conn, 1, 2

с ошибкой

-*-----------------

Microsoft OLE DB Provider for ODBC Drivers error '80040e21'

ODBC driver does not support the requested properties.

/manage/Banners_view.asp, line 85

--------------------

Данное место не единственное на сайте

.часть код...

"login" then response.redirect "login.asp" %>

Response.expires = 0

Response.expiresabsolute = Now() - 1

Response.addHeader "pragma", "no-cache"

Response.addHeader "cache-control", "private"

Response.CacheControl = "no-cache"

%>

response.buffer = true

'get key

key = request.querystring("key")

if key="" or isnull(key) then

key=request.form("key")

end if

if key="" or isnull(key) then response.redirect "Banners_list.asp"

'get action

a=request.form("a")

if a="" or isnull(a) then

a="I" 'display with input box

end if

' Open Connection to the database

set conn = Server.CreateObject("ADODB.Connection")

conn.Open DBCon

Select Case a

Case "I": ' Get a record to display

tkey = key

strsql = "select banners.* from banners "

dbwhere = " WHERE (banners.Id=" & tkey & ")"

If dbwhere

strsql = strsql & dbwhere

End If

set rs = Server.CreateObject("ADODB.Recordset")

rs.Open strsql, conn

If rs.EOF Then

Response.Clear

Response.Redirect "Banners_list.asp"

Else

rs.MoveFirst

End If

' Get the field contents

x_id = rs("id")

x_AltText = rs("AltText")

x_siteurl = rs("siteurl")

x_banner = rs("bannerURL")

x_forall = rs("forall")

x_world_id = rs("world_id")

x_state_id = rs("state_id")

x_city_id = rs("city_id")

x_internal = rs("internal")

x_external = rs("external")

if x_external then

bannerpath = x_banner

else

bannerpath = BOrelbannerDir & x_banner

end if

rs.Close

Set rs = Nothing

Case "D": ' Delete

' Open record

tkey = key

strsql = "SELECT * FROM Banners WHERE Id=" & tkey

set rs = Server.CreateObject("ADODB.Recordset")

rs.Open strsql, conn, 1, 2

If rs.EOF Then

Response.Clear

Response.Redirect "Banners_list.asp"

Else

If Not isNull(rs("bannerURL")) and (trim(rs("bannerURL")) & "x"

KillFile(BObannerDir & "" & rs("bannerURL"))

End If

rs.delete

rs.close

End If

conn.Close

Set conn = Nothing

Response.Clear

Response.Redirect "Banners_list.asp?ID=Deleted"

End Select

conn.Close

Set conn = Nothing

%>

17 лет назад
ktt
Украина
18 лет в сервисе
Был
5 лет назад
  • Похожие заказы
  • $50

    есть файл: [email protected] [email protected] [email protected] нужно чтобы скрипт удалял строку заданную мной. например задам [email protected] и он её удалит. причём остальные смещаются на одну строку вверх чтобы не было пробелов

    Завершен
    17 лет назад
  • Нужно написать грамотную админку! Все остальное в асе или сдесь в личке. Просьба тем кто не может даже не беспокоиться. Народ подсабите реально сроки горят сам не успеваю!

    Закрыт
    17 лет назад
  • $1000

    ТЗ - все должно работать + дизайн как на сайте deals.com (есть небольшие поправки) язык - русский. без предоплаты готовая работа - оплачивается 80% после тестирования - остаток 20% +% за идеи и скорость если есть мысли по улучшению функций - пишите. сроки ...

    Закрыт
    17 лет назад
  • Нужно настроить систему, с помощью которой можно было бы вытягивать данные с сайта написаного на флеш. Вот пример: http://soccernet.espn.go.com/match?id=203923&cc=5739 ссылка "gamecast" нужно практически все данные, которые там есть. Интересует возможно ли подобное и сколько будет стоить.

    Закрыт
    17 лет назад
  • Есть гостевая: http://photoshopschool.ru/gbook/gbook.php Нужно чтоб сообщения не добавлялись если в тексте не содержится ни одного русского символа. Вместо этого выводить сообщение. Думаю возни там минут на 10 для нормального програмиста. Деньги после выполнения работы.

    Завершен
    17 лет назад
  • $50

    Необходимо написать скрипт, который будет суммировать общий оборот Интернет магазина! Система использует сервис Digiseller.ru! 1.Предоставлю скрипт который импортирует данные с digiseller (оборот за сутки) 2.Необходимо написать скрипт который нужно запускать раз в сутки, и он бы импортировал ...

    Закрыт
    17 лет назад
  • скрипт php+mysql навигационное меню по категориям Структура таблицы Id - идентификатор пункта меню pid - родительский Id, если 0 - то корень name - название самого пункта меню path - путь, отсюда формируется вид ссылки на эту категорию rating - рейтинг категории, ...

    Закрыт
    17 лет назад
  • Нужен программист (знание php,Mysql,Javascript,Ajax) который поможет развитию игры http://echospace.ru "Эхо космоса". На данный момент написаны несколько функций. Игра разрабатывается на общих началах. В дальнейшем при запуске проекта, или нахождении спонсора, будет финансирование. Желающие принять ...

    Закрыт
    17 лет назад
  • Существует пока сайт на бесплатном хостинге. Это интернет-магазин детских товаров "Мое солнышко". http://www.solnishko-magazin.narod.ru Необходимо дописать отсутствующие perl-скрипты для отправки эл. почты пользователям с сайта администратору и для формирования заказа (корзины) с дальнейшей отправкой администратору.

    Закрыт
    17 лет назад
  • $50

    скрипт для проверки параметра интернет эксплорер присылает такую строку http://www.website.com/cgi-bin/Project.php?param1¶m2 в папке скриптов хранится файл 1.html скрипт проверяет встречается ли в файле param1 если не встречается то возвращает документ со словом Allowed если встречается param1 и сразу же за ним param2 ...

    Закрыт
    17 лет назад