När du kopplar din databas till asp-sidor är det viktigt att du använder dig av rätt ConnectionString, vilken ser ut enligt följande:
[red]"Provider=SQLOLEDB;Server=dbhost1.telenordia.se;Database=databas_namn;UserId=
användar_namn;Password=lösenord;Extended Properties=" & Chr(34) & "Network=dbmssocn" & Chr(34)[/red]
Som databas anger du namnet på din databas. Användarnamn och lösenord är det användarnamn och lösenord du har blivit tilldelad av Telenordia. Trots att användarnamnet och lösenordet står i koden, kan användarna ändå inte komma åt dem eftersom asp-sidorna körs på servern och aldrig visas på klienten. ConnectionString kan anges antingen som en egenskap för objekten Connection, Recordset och Command, eller som en parameter vid öppnandet av objekten.
Nedan följer ett exempel på hur ConnectionString anges som egenskap till Connection-objektet. På grund av den smala spaltbredden görs en radbrytning i strängen, vilken i asp-sidan måste stå på en och samma rad:
[red]<%
Set con = Server.CreateObject("ADODB.Connection")
con.ConnectionString = "Provider=SQLOLEDB;Server=dbhost1.telenordia.se;Database=jesper;UserId=
jesper;Password=jesper;Extended Properties=" & Chr(34) & "Network=dbmssocn" & Chr(34)
con.Open
con.Execute("DELETE FROM test WHERE nr > 20)
con.Close
Set con = nothing
%>[/red]
Om ConnectionString istället anges som en parameter till metoden Open, ser det ut så här:
[red]<%
Set con = Server.CreateObject("ADODB.Connection")
con.Open "Provider=SQLOLEDB;Server=dbhost1.telenordia.se;Database=jesper;UserId=
jesper;Password=jesper;Extended Properties=" & Chr(34) & "Network=dbmssocn" & Chr(34)
con.Execute("DELETE FROM test WHERE nr > 20)
con.Close
Set con = nothing
%>[/red]
För objekten Recordset och Command kan man använda egenskapen ActiveConnection på motsvarande sätt:
[red]<%
Set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = "Provider=SQLOLEDB;Server=dbhost1.telenordia.se;Database=jesper;UserId=
jesper;Password=jesper;Extended Properties=" & Chr(34) & "Network=dbmssocn" & Chr(34)
rs.Source = "SELECT * FROM test"
rs.Open
do until rs.EOF
Response.Write rs(1) & "<br>"
rs.Movenext
Loop
rs.Close
Set rs = nothing
%>[/red]
Alternativt kan man också ange en ConnectionString som parameter till metoden Open:
[red]<%
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open "SELECT * FROM test",
"Provider=SQLOLEDB;Server=dbhost1.telenordia.se;Database=jesper;UserId=
jesper;Password=jesper;Extended Properties=" & Chr(34) & "Network=dbmssocn" & Chr(34)
do until rs.EOF
Response.Write rs(1) & "<br>"
rs.Movenext
Loop
rs.Close
Set rs = nothing
%>[/red]
kommer inte ihåg vart jag fann det här men det ger nog svar på din fråga.
