-
Connection to db
I've just started using asp.net so I have a simple question regarding connections.
I have the code shown below, from which I wish to store the result in a variable, how do I do that? Below that I have the code from ASP where I declare the content of the variable.
Code:
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.Oledb" %>
<script language="vb" runat="server">
'Her kommer funktion, der connecter til databasen, når der klikkes på "Login"
'Jeg bruger Command Object og DataReader, da jeg kun skal læse fra databasen
sub ClickHandler(sender as object, e as EventArgs)
Dim strCn as String ="Provider=Microsoft.jet.oledb.4.0;"
strCn += "Data Source=c:\BegASPNET\OblOpg\autohuset.mdb"
Dim strSql as string = "SELECT Login, Password FROM Medarbejder WHERE Login='" & bruger.text & "'"
response.write(strSql)
Dim strResultsHolder as string
Dim objConnection as New OledbConnection(strCn)
Dim objCommand as New OledbCommand(strSql, objConnection)
Dim objDataReader as OledbDataReader
try
objConnection.open()
con_open.text ="Connection openend"
objDataReader = objCommand.ExecuteReader()
Do While objDataReader.Read()=true
strResultsHolder += objDataReader("Login")
strResultsHolder += " "
strResultsHolder += objDataReader("Password")
strResultsHolder += "<br>"
Loop
objDataReader.close()
objConnection.close()
con_close.text ="Connection closed <br>"
divListEmployees.innerHTML = strResultsHolder
catch f as Exception
con_open.text = "Connection faliede to open succefukll.<br>"
con_close.text=f.ToString()
end try
end sub
</script>
<html>
<body>
<font style="font-family: helvetica">
<br/><br/><br/><br/>
<center>
<h1>Velkommen til Autohuset</h1>
<form runat="server">
Dette er login siden. Du bedes venligst indtaste Brugernavn og password.
<br/>
<br/>
<asp:Label id="con_open" runat="server"/><br>
<div id="divListEmployees" runat="server"> List will go here</div>
<asp:Label id="con_close" runat="server"/><br>
<table bgcolor=#cecece border=0>
<tr>
<td>Brugernavn</td>
<td><asp:textbox id="bruger" runat="server" width="125px" /></td>
</tr>
<tr>
<td>Password</td>
<td><asp:textbox id="pass" runat="server" textmode="password" width="125px"/></td>
</tr>
</table>
<br/><asp:button id="btnSubmit" text="Login" onclick="clickhandler" runat="server"/><br/><br/>
</form>
</center>
</font>
</body>
ASP
[code]
sqlGodsk ="select s_kappe from peh_kappe_konti where d_kappe=" & d_kappe
set rs2 = myconn2.execute(sqlGodsk)
if not (rs2.bof or rs2.eof) then
do while not rs2.eof
s_kappe = rs2("s_kappe")
rs2.movenext
loop
end if
rs2.close
-
I've found out, sorry for spending your time
