На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
  
    > asp не открывает базу данных..
      у меня вредный АСП теперь не хочет базу данных (аксесс) открывать..
      я ему человеческим языком говорю:

      <html>
      <body>
      <\%
      Dim db, rs, sSQL, sSearchString
      sSearchString=request.Form ("txtSearch")
      response.Write(sSearchString)
      if sSearchString=" " then
           response.Write("ne vvedena stroka")
           response.End()
      end if
      Set db = Server.CreateObject("ADODB.Connection")
      db.open "seti"

      'sSQL=" SELECT * FROM KLIENT WHERE PERENIMI LIKE "
      'sSQL=sSQL &  sSearchString
      'Set rs = db.execute(sSQL)
      \%>

      <table border="1">
      <tr> Names </tr>

      <\%
      'While Not rs.EOF
      '      Response.Write("<tr> <td>")
      '      response.Write rs.fields ("klient")
      '      response.Write("<td> <tr>")
      '      rs.moveNext
      'Wend
      'rs.close

      db.close

      'set rs=nothing

      set db=nothing
      \%>

      </table>
      </body>
      </html>

      если закоментировать все, что касается базы, то он из формы имя получает.
      если запустить в таком виде, говорит, что страница не может быть открыта..
      seti - системный ДСН той базы, которую он должен открыть.
      подскажите, что ему надо??
        Прежде чем делать open ИМХО следует указать, что собственно ты хочешь открыть.
        Пишешь, что ACCESS.

        Тогда вроде так:

        Set db = Server.CreateObject("ADODB.Connection")

        db.Provider = "Microsoft.Jet.OLEDB.4.0" //или что там у тебя
        db.ConnectionString = "Data Source=" & Server.MapPath (seti)
        db.Open
        .... и т.д.
        0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
        0 пользователей:


        Рейтинг@Mail.ru
        [ Script execution time: 0,0147 ]   [ 16 queries used ]   [ Generated: 28.03.24, 22:16 GMT ]