Наши проекты:
Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту |
||
ПРАВИЛА | FAQ | Помощь | Поиск | Участники | Календарь | Избранное | RSS |
[34.204.196.206] |
|
Сообщ.
#1
,
|
|
|
у меня вредный АСП теперь не хочет базу данных (аксесс) открывать..
я ему человеческим языком говорю: <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 - системный ДСН той базы, которую он должен открыть. подскажите, что ему надо?? |
Сообщ.
#2
,
|
|
|
Прежде чем делать open ИМХО следует указать, что собственно ты хочешь открыть.
Пишешь, что ACCESS. Тогда вроде так: Set db = Server.CreateObject("ADODB.Connection") db.Provider = "Microsoft.Jet.OLEDB.4.0" //или что там у тебя db.ConnectionString = "Data Source=" & Server.MapPath (seti) db.Open .... и т.д. |