vbscript, Data source name not found and no default driver specified HELP!

Data source name not found and no default driver specified HELP!

Author	Message
Cevdet Da #1 / 4	Data source name not found and no default driver specified HELP! ERROR: Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified /dokuman/minsiplist/MinSipList.asp, line 17 what is nat right there HELP!! <-----MinSipList.asp file-------> <html> <head> <meta http-equiv=Content-Type content="text/html; charset=windows-1254"> <title>Minimum Sipari? Listesi</title> <% dim stkkod stkkod = Request.QueryString("stokkodu") %> </head> <body lang=EN-TR link=blue vlink=purple style="tab-interval: .5in" background=image2.jpg> <% Session.timeout = 1 If IsObject(Session("SMIK_conn")) Then Set conn = Session("SMIK_conn") Else Set conn = Server.CreateObject("ADODB.Connection") conn.open "SMIK","cevdet","cevnur" Set Session("SMIK_conn") = conn End If %> <% If IsObject(Session("Sip_List_rs")) Then Set rs = Session("Sip_List_rs") Else sql = "SELECT STKKOD, STKADI, STKBARKOD, STKBRMMIK FROM STKSTOKPF WHERE (STKKOD='" & stkkod & "')" Set rs = Server.CreateObject("ADODB.Recordset") rs.Open sql, conn, 3, 3 If rs.eof Then rs.AddNew End If Set Session("Sip_List_rs") = rs End If %> <TABLE BORDER=1 BGCOLOR=darkcyan CELLSPACING=0 borderColor=darkcyan borderColorDark=darkcyan borderColorLight=darkslateblue style="BACKGROUND-COLOR: darkcyan; LEFT: 85px; POSITION: absolute; TOP: 103px"><FONT FACE="Arial" COLOR=#000000><CAPTION><B style="FONT-FAMILY: Arial" >M?NM?MUM S?PAR?? L?STES?</B></CAPTION></FONT> <THEAD> <TR style="BACKGROUND-COLOR: darkcyan; COLOR: yellow"> <TH bgcolor=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" >STOK KODU???????</FONT></TH> <TH BGCOLOR=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" >STOK ADI????????????& nbsp;???????????? ;????????</FONT></TH> <TH BGCOLOR=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" >BARKOD NO????????????&n bsp;????</FONT></TH> <TH BGCOLOR=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" >M?N?MUM S?PAR?? M?KTARI</FONT></TH> </TR> </THEAD> <TBODY> <% On Error Resume Next rs.MoveFirst do while Not rs.eof %> <TR VALIGN=top> <TD BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKKOD").Value)%><BR></FONT></ TD> <TD BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKADI").Value)%><BR></FONT></ TD> <TD BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKBARKOD").Value)%><BR></FONT Quote: ></TD> <TD BORDERCOLOR=#000000 ALIGN=right><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKBRMMIK").Value)%><BR></FONT Quote: ></TD> </TR> <% rs.MoveNext loop rs.Close conn.Close Session.Abandon %> </TBODY> <TFOOT></TFOOT> </TABLE></body> </html>
Mon, 05 May 2003 03:00:00 GMT

Bret Her #2 / 4	Data source name not found and no default driver specified HELP! Quote: > conn.open "SMIK","cevdet","cevnur" When you open a connection, there are a lot of ways to do it, but assuming you're trying to open an ODBC connection named SMIK, you need to do the following: 1) Make sure an ODBC System DSN called SMIK is defined on your server -- it needs to point to the proper database, and you can supply your userid and password information in that DSN setup. 2) Change your code to: conn.open "DSN=SMIK" Good luck, Bret Quote: > ERROR: > Microsoft OLE DB Provider for ODBC Drivers error '80004005' > [Microsoft][ODBC Driver Manager] Data source name not found and no default > driver specified > /dokuman/minsiplist/MinSipList.asp, line 17 > what is nat right there > HELP!! > <-----MinSipList.asp file-------> > <html> > <head> > <meta http-equiv=Content-Type content="text/html; charset=windows-1254"> > <title>Minimum Siparit Listesi</title> > <% dim stkkod > stkkod = Request.QueryString("stokkodu") > %> > </head> > <body lang=EN-TR link=blue vlink=purple style="tab-interval: .5in" > background=image2.jpg> > <% > Session.timeout = 1 > If IsObject(Session("SMIK_conn")) Then > Set conn = Session("SMIK_conn") > Else > Set conn = Server.CreateObject("ADODB.Connection") > conn.open "SMIK","cevdet","cevnur" > Set Session("SMIK_conn") = conn > End If > %> > <% > If IsObject(Session("Sip_List_rs")) Then > Set rs = Session("Sip_List_rs") > Else > sql = "SELECT STKKOD, STKADI, STKBARKOD, STKBRMMIK FROM STKSTOKPF WHERE > (STKKOD='" & stkkod & "')" > Set rs = Server.CreateObject("ADODB.Recordset") > rs.Open sql, conn, 3, 3 > If rs.eof Then > rs.AddNew > End If > Set Session("Sip_List_rs") = rs > End If > %> > <TABLE BORDER=1 BGCOLOR=darkcyan CELLSPACING=0 borderColor=darkcyan > borderColorDark=darkcyan borderColorLight=darkslateblue > style="BACKGROUND-COLOR: darkcyan; LEFT: 85px; POSITION: absolute; TOP: > 103px"><FONT FACE="Arial" COLOR=#000000><CAPTION><B style="FONT-FAMILY: > Arial" > >MYNMYMUM SYPARYT LYSTESY</B></CAPTION></FONT> > <THEAD> > <TR style="BACKGROUND-COLOR: darkcyan; COLOR: yellow"> > <TH bgcolor=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" > COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" > >STOK KODU       </FONT></TH> > <TH BGCOLOR=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" > COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" > >STOK ADI            & nbsp;           &nbsp Quote: > ;        </FONT></TH> > <TH BGCOLOR=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" > COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" > >BARKOD NO            &n - Hide quoted text - - Show quoted text - Quote: > bsp;    </FONT></TH> > <TH BGCOLOR=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" > COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" > >MYNYMUM SYPARYT MYKTARI</FONT></TH> > </TR> > </THEAD> > <TBODY> > <% > On Error Resume Next > rs.MoveFirst > do while Not rs.eof > %> > <TR VALIGN=top> > <TD BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKKOD").Value)%><BR></FONT></ Quote: > TD> > <TD BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKADI").Value)%><BR></FONT></ Quote: > TD> > <TD BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKBARKOD").Value)%><BR></FONT Quote: > ></TD> > <TD BORDERCOLOR=#000000 ALIGN=right><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKBRMMIK").Value)%><BR></FONT - Hide quoted text - - Show quoted text - Quote: > ></TD> > </TR> > <% > rs.MoveNext > loop > rs.Close > conn.Close > Session.Abandon > %> > </TBODY> > <TFOOT></TFOOT> > </TABLE></body> > </html>
Mon, 05 May 2003 03:00:00 GMT

#3 / 4	Data source name not found and no default driver specified HELP!
Fri, 19 Jun 1992 00:00:00 GMT

Cevdet Da #4 / 4	Data source name not found and no default driver specified HELP! thanks for your help Quote: > > conn.open "SMIK","cevdet","cevnur" > When you open a connection, there are a lot of ways to do it, but assuming > you're trying to open an ODBC connection named SMIK, you need to do the > following: > 1) Make sure an ODBC System DSN called SMIK is defined on your server -- it > needs to point to the proper database, and you can supply your userid and > password information in that DSN setup. > 2) Change your code to: > conn.open "DSN=SMIK" > Good luck, > Bret > > ERROR: > > Microsoft OLE DB Provider for ODBC Drivers error '80004005' > > [Microsoft][ODBC Driver Manager] Data source name not found and no default > > driver specified > > /dokuman/minsiplist/MinSipList.asp, line 17 > > what is nat right there > > HELP!! > > <-----MinSipList.asp file-------> > > <html> > > <head> > > <meta http-equiv=Content-Type content="text/html; charset=windows-1254"> > > <title>Minimum Siparit Listesi</title> > > <% dim stkkod > > stkkod = Request.QueryString("stokkodu") > > %> > > </head> > > <body lang=EN-TR link=blue vlink=purple style="tab-interval: .5in" > > background=image2.jpg> > > <% > > Session.timeout = 1 > > If IsObject(Session("SMIK_conn")) Then > > Set conn = Session("SMIK_conn") > > Else > > Set conn = Server.CreateObject("ADODB.Connection") > > conn.open "SMIK","cevdet","cevnur" > > Set Session("SMIK_conn") = conn > > End If > > %> > > <% > > If IsObject(Session("Sip_List_rs")) Then > > Set rs = Session("Sip_List_rs") > > Else > > sql = "SELECT STKKOD, STKADI, STKBARKOD, STKBRMMIK FROM STKSTOKPF > WHERE > > (STKKOD='" & stkkod & "')" > > Set rs = Server.CreateObject("ADODB.Recordset") > > rs.Open sql, conn, 3, 3 > > If rs.eof Then > > rs.AddNew > > End If > > Set Session("Sip_List_rs") = rs > > End If > > %> > > <TABLE BORDER=1 BGCOLOR=darkcyan CELLSPACING=0 borderColor=darkcyan > > borderColorDark=darkcyan borderColorLight=darkslateblue > > style="BACKGROUND-COLOR: darkcyan; LEFT: 85px; POSITION: absolute; TOP: > > 103px"><FONT FACE="Arial" COLOR=#000000><CAPTION><B style="FONT-FAMILY: > > Arial" > > >MYNMYMUM SYPARYT LYSTESY</B></CAPTION></FONT> > > <THEAD> > > <TR style="BACKGROUND-COLOR: darkcyan; COLOR: yellow"> > > <TH bgcolor=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" > > COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" > > >STOK KODU???????</FONT></TH> > > <TH BGCOLOR=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" > > COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" > > >STOK ADI????????????& nbsp;???????????? Quote: > > ;????????</FONT></TH> > > <TH BGCOLOR=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" > > COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" > > >BARKOD NO????????????&n - Hide quoted text - - Show quoted text - Quote: > > bsp;????</FONT></TH> > > <TH BGCOLOR=darkcyan BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Arial" > > COLOR=#000000 style="BACKGROUND-COLOR: darkcyan; COLOR: yellow" > > >MYNYMUM SYPARYT MYKTARI</FONT></TH> > > </TR> > > </THEAD> > > <TBODY> > > <% > > On Error Resume Next > > rs.MoveFirst > > do while Not rs.eof > > %> > > <TR VALIGN=top> > > <TD BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKKOD").Value)%><BR></FONT></ Quote: > > TD> > > <TD BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKADI").Value)%><BR></FONT></ Quote: > > TD> > > <TD BORDERCOLOR=#000000 ><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKBARKOD").Value)%><BR></FONT Quote: > > ></TD> > > <TD BORDERCOLOR=#000000 ALIGN=right><FONT SIZE=2 FACE="Tahoma" COLOR=#000000><%=Server.HTMLEncode(rs.Fields("STKBRMMIK").Value)%><BR></FONT - Hide quoted text - - Show quoted text - Quote: > > ></TD> > > </TR> > > <% > > rs.MoveNext > > loop > > rs.Close > > conn.Close > > Session.Abandon > > %> > > </TBODY> > > <TFOOT></TFOOT> > > </TABLE></body> > > </html>
Tue, 06 May 2003 14:19:17 GMT

Page 1 of 1

[ 4 post ]