오류 형식:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC 드라이버 관리자] 데이터 원본 이름이 없고 기본
드라이버를 지정하지 않았습니다.
/dbconn1.asp, line 18
위와같은 에러가 나타납니다.
개발환경은 xp pro _ sp2 환경이구요(local에다 iis 설정과mysql
인스톨함) mysql은 4.1,5.0 다 해보았습니다.방화벽도 다내리고...
마찬가지 입니다. 그런데 2003서버에서도 해보았는데 안되더군요 그러나
vb에서는 됩니다.vb 에서도 처음엔 치명적인 에러 발생 그렇게 나오다가
odbc 3.51 _XXX 인스톨 해보니까 되는 겁니다.
정녕 xp에서만 안되는지요 ... 2000 pro 에서는 어떤지...
xp_sp2에서 성공하시분 있는지요...
답변 기다립니다.
소스
<%
Dim strConnect
Dim adoConn, adoRs, SQL
'어려가지 방법을 사용한 흔적임(다안됨)
'strConnect = "Provider=MySQLProv;Location=localhost;Data
Source=xxx_mysql;User Idxxx;password=xxx"
'strConnect= "Driver={MySQL ODBC 3.51 Driver}; Server=localhost;
Port=3306; Option=3;Database=test; Uid=xxx; Pwd=xxx;"
strConnect= "Driver={MySQL}; Server=localhost; Port=3306;
Option=3;Database=test; Uid=xxx; Pwd=xxx;"
Set adoConn = CreateObject("ADODB.Connection")
adoConn.Open strConnect
set adoRS = Server.CreateObject("ADODB.Recordset")
if adoConn.errors.count = 0 then
adoRS.Open "select * from inx_xxx",adoConn
response.write adoRS.fields(0).value
else
response.write "ERROR: Couldn't connect to database"
end if
%>
<%
Dim strConnect
Dim adoConn, adoRs, SQL
'strConnect = "Provider=MySQLProv;Location=localhost;Data Source=nca_mysql;User Id=kimbi;password=kimbi"
'strConnect = "Provider=MySQLProv;Location=localhost;Data Source=nca_mysql;User Id=root;password=kimbi;"
'strConnect= "Driver={MySQL ODBC 3.51 Driver}; Server=localhost; Port=3306; Option=3;Database=test; Uid=root; Pwd=kimbi;"
strConnect= "Driver={MySQL}; Server=localhost; Port=3306; Option=3;Database=sit_ana; Uid=root; Pwd=kimbi;"
Set adoConn = CreateObject("ADODB.Connection")
adoConn.Open strConnect
set adoRS = Server.CreateObject("ADODB.Recordset")
if adoConn.errors.count = 0 then
'adoRS.Open "select * from inx_tit","dsn=nca_mysql;uid=root;pwd=kimbi; Option=3;",adOpenDynamic,adLockBatchOptimistic
adoRS.Open "select * from inx_tit",adoConn
'response.write adoRS.fields(0).value
else
response.write "ERROR: Couldn't connect to database"
end if
%><%
Dim strConnect
Dim adoConn, adoRs, SQL
'strConnect = "Provider=MySQLProv;Location=localhost;Data Source=nca_mysql;User Id=kimbi;password=kimbi"
'strConnect = "Provider=MySQLProv;Location=localhost;Data Source=nca_mysql;User Id=root;password=kimbi;"
'strConnect= "Driver={MySQL ODBC 3.51 Driver}; Server=localhost; Port=3306; Option=3;Database=test; Uid=root; Pwd=kimbi;"
strConnect= "Driver={MySQL}; Server=localhost; Port=3306; Option=3;Database=sit_ana; Uid=root; Pwd=kimbi;"
Set adoConn = CreateObject("ADODB.Connection")
adoConn.Open strConnect
set adoRS = Server.CreateObject("ADODB.Recordset")
if adoConn.errors.count = 0 then
'adoRS.Open "select * from inx_tit","dsn=nca_mysql;uid=root;pwd=kimbi; Option=3;",adOpenDynamic,adLockBatchOptimistic
adoRS.Open "select * from inx_tit",adoConn
'response.write adoRS.fields(0).value
else
response.write "ERROR: Couldn't connect to database"
end if
%><%
Dim strConnect
Dim adoConn, adoRs, SQL
'strConnect = "Provider=MySQLProv;Location=localhost;Data Source=nca_mysql;User Id=kimbi;password=kimbi"
'strConnect = "Provider=MySQLProv;Location=localhost;Data Source=nca_mysql;User Id=root;password=kimbi;"
'strConnect= "Driver={MySQL ODBC 3.51 Driver}; Server=localhost; Port=3306; Option=3;Database=test; Uid=root; Pwd=kimbi;"
strConnect= "Driver={MySQL}; Server=localhost; Port=3306; Option=3;Database=sit_ana; Uid=root; Pwd=kimbi;"
Set adoConn = CreateObject("ADODB.Connection")
adoConn.Open strConnect
set adoRS = Server.CreateObject("ADODB.Recordset")
if adoConn.errors.count = 0 then
'adoRS.Open "select * from inx_tit","dsn=nca_mysql;uid=root;pwd=kimbi; Option=3;",adOpenDynamic,adLockBatchOptimistic
adoRS.Open "select * from inx_tit",adoConn
'response.write adoRS.fields(0).value
else
response.write "ERROR: Couldn't connect to database"
end if
%><%
Dim strConnect
Dim adoConn, adoRs, SQL
'strConnect = "Provider=MySQLProv;Location=localhost;Data Source=nca_mysql;User Id=kimbi;password=kimbi"
'strConnect = "Provider=MySQLProv;Location=localhost;Data Source=nca_mysql;User Id=root;password=kimbi;"
'strConnect= "Driver={MySQL ODBC 3.51 Driver}; Server=localhost; Port=3306; Option=3;Database=test; Uid=root; Pwd=kimbi;"
strConnect= "Driver={MySQL}; Server=localhost; Port=3306; Option=3;Database=sit_ana; Uid=root; Pwd=kimbi;"
Set adoConn = CreateObject("ADODB.Connection")
adoConn.Open strConnect
set adoRS = Server.CreateObject("ADODB.Recordset")
if adoConn.errors.count = 0 then
'adoRS.Open "select * from inx_tit","dsn=nca_mysql;uid=root;pwd=kimbi; Option=3;",adOpenDynamic,adLockBatchOptimistic
adoRS.Open "select * from inx_tit",adoConn
'response.write adoRS.fields(0).value
else
response.write "ERROR: Couldn't connect to database"
end if
%>
|