Just nu i M3-nätverket
Jump to content

Databaskoppling fungerar ej!!!


Lindacharlotta

Recommended Posts

Lindacharlotta

Hej. Jag kan inte få ihop min koppling till min SQL-datas!!!Jag har gjort en DSN, som jag döpt linda. Någon som vet vad jag gör för fel???

 

/Linda

 

<%

 

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

Set rs=Server.CreateObject("ADODB.Recordset")

 

MinCon.ConnectionString = "DSN=linda;UID=administrator;PWD=mittlosenord;"

MinCon.Open

Set rs=MinCon.Execute("Select* from Fornamn")

%>

<%

While not rs.EOF

%>

<%

Response.Write(rs.Fields("Fornamn"))%>

 

<%

rs.MoveNext

Wend

MinCon.Close

%>

 

Link to comment
Share on other sites

Så här gör jag:

 

<%

Dim Conn, rs

Set Conn = Server.CreateObject("ADODB.Connection")
Conn.ConnectionString = "driver={SQL Server};server=serveradress;uid=administrator;pwd=mittlosenord;database=databasnamn"	
Conn.Open

Set rs=Conn.Execute("Select * from Fornamn")

While not rs.EOF

Response.Write rs("Fornamn")
rs.MoveNext

Wend

Conn.Close

%>

 

Obs! Mellanslag mellan Select och * också i SQL satsen.

 

/JANspeed

 

[red]Vad mycket man kommer på om tid ges. :) [/red]

[inlägget ändrat 2003-04-01 13:23:34 av JANspeed]

Link to comment
Share on other sites

Archived

This topic is now archived and is closed to further replies.



×
×
  • Create New...