﻿<?xml version='1.0' encoding='UTF-8'?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/"><channel><title>Релиб / ASP / Веб-программирование  / ASP Jscript Access / Latest Posts</title><generator>InstantForum.NET v4.1.4</generator><description>Релиб</description><link>http://www.relib.com/forums/</link><webMaster>robot@relib.com</webMaster><lastBuildDate>Sun, 23 Nov 2008 03:30:54 GMT</lastBuildDate><ttl>20</ttl><item><title>RE: ASP Jscript Access</title><link>http://www.relib.com/forums/Topic913149-4-1.aspx</link><description>Потому что ошибки в SELECTе у тебя.&lt;/P&gt;&lt;P&gt;BD - это имя таблицы?&lt;/P&gt;&lt;P&gt;Я тебе настоятельно советую избавиться от названий полей русскими буквами. Если не охоть морочить голову переводом (first_name, last_name, mid_name - никаких пробелов!), то просто используй латиницу - imya, familiya, otchestvo - все равно кроме тебя и давйвера это никто не увидит, но драйвер русские названия объектов не понимает (значения полей рксские - без проблем).&lt;/P&gt;&lt;P&gt;Что такое like &lt;STRONG&gt;stroka&lt;/STRONG&gt;*? Переменная? Я не нашел в коде такой переменной.&lt;/P&gt;&lt;P&gt;Если бы это была переменная, то select должен быть таким:&lt;/P&gt;&lt;P&gt;str="SELECT distinct mid_name FROM BD WHERE mid_name like '" +stroka+"%'";</description><pubDate>Thu, 17 May 2007 16:37:52 GMT</pubDate><dc:creator>vlgsh</dc:creator></item><item><title>RE: ASP Jscript Access</title><link>http://www.relib.com/forums/Topic913149-4-1.aspx</link><description>Увы так и не получилось,теперь почему то он жалуется на adstrtext и execute&lt;br&gt;Не подскажете что делать?</description><pubDate>Tue, 15 May 2007 19:13:17 GMT</pubDate><dc:creator>Ilgar</dc:creator></item><item><title>RE: ASP Jscript Access</title><link>http://www.relib.com/forums/Topic913149-4-1.aspx</link><description>Я так понял, ты второй раз запостил тот же вопрос несколько другими словами? Смотри ответ там.</description><pubDate>Tue, 15 May 2007 16:15:38 GMT</pubDate><dc:creator>vlgsh</dc:creator></item><item><title>ASP Jscript Access</title><link>http://www.relib.com/forums/Topic913149-4-1.aspx</link><description>Здравствуйте&lt;/P&gt;&lt;P&gt;не подскажете как мне настроить БД ACCESS для того чтобы можно было бы получить из ASP доступ к акцесс ???&lt;/P&gt;&lt;P&gt;У меня Эксплоуер выдает ошибку &lt;BR&gt;Тип ошибки:&lt;BR&gt;Microsoft OLE DB Provider for ODBC Drivers (0x80004005)&lt;BR&gt;[Microsoft][Диспетчер драйверов ODBC] Источник данных не найден и не указан драйвер, используемый по умолчанию&lt;BR&gt;/my.asp, line 61&lt;/P&gt;&lt;P&gt;Я вроде установил это драйвер, но он опять жалуется на драйвер.&lt;BR&gt;А драйвер я подключаю следующим образом :&lt;BR&gt;Панель управления\Администрирование \ Источник данных ODBC \Системный DNS и добавляю драйвер Microsoft Access Driver  с именем myBD. myBD- это моя БД на акцессе.&lt;/P&gt;&lt;P&gt;а вот код asp файла &lt;/P&gt;&lt;P&gt;&amp;lt;%@ Language=JavaScript %&amp;gt; &lt;BR&gt;&amp;lt;HEAD&amp;gt;&lt;BR&gt;&amp;lt;meta http-equiv="content-type" content="text/html; charset=Windows-1251"&amp;gt; &lt;BR&gt;&amp;lt;BODY&amp;gt;&lt;/P&gt;&lt;P&gt;&amp;lt;H3&amp;gt; База данных  &amp;lt;/H3&amp;gt;&lt;/P&gt;&lt;P&gt;&amp;lt;% &lt;BR&gt;   var strChoice;&lt;BR&gt;   var str; &lt;BR&gt;   var stroka;&lt;BR&gt;   &lt;BR&gt;  &lt;BR&gt;%&amp;gt;&lt;/P&gt;&lt;P&gt;&amp;lt;FORM NAME="mailer" method="post" action="my.asp"&amp;gt;&lt;/P&gt;&lt;P&gt;&amp;lt;P ALIGN=left&amp;gt;&lt;/P&gt;&lt;P&gt;&amp;lt;INPUT TYPE="text" NAME="strin"  size="50" &amp;gt;&lt;BR&gt;&amp;lt;input type="submit" value="Поиск"&amp;gt;&lt;BR&gt; &lt;BR&gt;        &lt;BR&gt;&amp;lt;P ALIGN=left&amp;gt;&lt;BR&gt;&amp;lt;INPUT TYPE=radio NAME="choice" VALUE="Фамилия" CHECKED &amp;gt; Фамилия&lt;/P&gt;&lt;P&gt;&amp;lt;P&amp;gt;&lt;BR&gt;&amp;lt;INPUT TYPE=radio NAME="choice" VALUE="Имя"  &amp;gt; Имя&lt;/P&gt;&lt;P&gt;&amp;lt;P&amp;gt;&lt;BR&gt;&amp;lt;INPUT TYPE=radio NAME="choice" VALUE="Отчество"  &amp;gt; Отчество&lt;/P&gt;&lt;P&gt;&amp;lt;%&lt;/P&gt;&lt;P&gt;&lt;BR&gt;strChoice=String(Request.Form("choice"));&lt;/P&gt;&lt;P&gt;&lt;BR&gt;if (Request.Form("strin")!="")&lt;BR&gt;{ &lt;BR&gt;   stroka=Request.Form("strin");&lt;BR&gt;} &lt;BR&gt;else&lt;BR&gt;{&lt;BR&gt;  stroka="Введите данные для поиска";&lt;BR&gt;}&lt;/P&gt;&lt;P&gt;if(stroka=="undefined") &lt;BR&gt;{&lt;BR&gt;  stroka="Введите данные для поиска";&lt;BR&gt;}&lt;/P&gt;&lt;P&gt;&lt;BR&gt;if(strChoice=="undefined")&lt;BR&gt;{&lt;BR&gt;   strChoice="Фамилия";&lt;BR&gt;}&lt;/P&gt;&lt;P&gt;var connect;&lt;BR&gt;    connect=Server.CreateObject("ADODB.Connection");&lt;BR&gt;    connect.ConnectionTimeout=15;&lt;BR&gt;    connect.CommandTimeout=10;&lt;BR&gt;    connect.Open("DSN=myDB");&lt;/P&gt;&lt;P&gt;var cmd=Server.CreateObject("ADODB.Command");&lt;BR&gt;    cmd.ActiveConnection=connect;&lt;/P&gt;&lt;P&gt;if (strChoice=="Фамилия") then&lt;BR&gt;str="SELECT distinct Фамилия FROM BD WHERE Фамилия like stroka* ";&lt;/P&gt;&lt;P&gt;if (strChoice=="Имя") then&lt;BR&gt;str="SELECT distinct Имя FROM BD WHERE Имя like stroka* ";&lt;/P&gt;&lt;P&gt;if (strChoice=="Отчество") then &lt;BR&gt;str="SELECT distinct Отчество FROM BD WHERE Отчество like stroka* ";&lt;/P&gt;&lt;P&gt;var record=connect.Execute(str);&lt;BR&gt;response.write("Результат поиска: &amp;lt;hr&amp;gt;");&lt;BR&gt;while(!record.eof)&lt;BR&gt;{&lt;BR&gt;response.write(record("str"));&lt;BR&gt;record.MoveNext();&lt;BR&gt;}&lt;BR&gt;connect.close();&lt;BR&gt;%&amp;gt; &lt;/P&gt;&lt;P&gt;&amp;lt;B&amp;gt;Результат поиска &amp;lt;/B&amp;gt; &lt;/P&gt;&lt;P&gt;&lt;BR&gt;&amp;lt;TEXTAREA NAME=address ROWS=5 COLS=50&amp;gt;&amp;lt;% Response.Write(strChoice+" "+record("str")&amp;gt; &amp;lt;/TEXTAREA&amp;gt;&lt;BR&gt;         &lt;BR&gt;&amp;lt;/FORM&amp;gt;&lt;BR&gt;&amp;lt;/BODY&amp;gt;&lt;BR&gt;&amp;lt;/HEAD&amp;gt;</description><pubDate>Thu, 10 May 2007 11:52:51 GMT</pubDate><dc:creator>Ilgar</dc:creator></item></channel></rss>