webForumDet fria alternativet

Vidare från indexsida

ASP

113 svar · 741 visningar · startad av Zerephina · sida 2 av 6

Frågan, av Zerephina

Jag har en indexsida och så frames på den. Hur skall jag skriva för att UserID skall följa med till den andra sidan: <frame name="main" src= valkommen.asp?UserID=<%=rs("UserID")%> > Jag gjorde ett försök men det funkade ej :-) \------------------ /Sophie\

Läs frågan i sin helhet →
Medlem sedan okt. 20005 273 inlägg
#21

joo cyprus.. :)

men hur går det för Zerephina :q

------------------
I like ¼ £ whith cheese

Medlem sedan dec. 20003 563 inlägg
#22

Vi väntar med spänning ;)

------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

Medlem sedan juni 20019 024 inlägg
#23

Vad ska man göra kl 00:45 på en måndagskväll? ;)

------------------
Peter D

Medlem sedan sep. 2000206 inlägg
#24

Jodå, jag testar alla varianter. Men jag får inget att funka. Antingen visas sidan inte över huvudtaget eller så blir det "missing op..."

Jag funderar på om det skickas nått till "valkommen"sidan och om feler ligger där, eller om det helt enkelt inte finns nått att skicka.

------------------
/Sophie*

Medlem sedan dec. 20003 563 inlägg
#25

Hjälpa folk med databasproblem såklart. :e

------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

Medlem sedan sep. 2000206 inlägg
#26

Nu gör jag lite onödigt här och skickar massor av html-kod också men... Ja här är första själva inlogningssidan:

<HTML>
<HEAD>
<META NAME="robots" CONTENT="noindex">
</HEAD>
<BODY>

<FORM ACTION = "frame.asp" METHOD = "POST">

<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "DSN=databas;UID=;PWD="
%>

<TABLE BORDER="0" CELLPADDING="0" CELLSPACING="0" HEIGHT="100%" WIDTH="100%">
<TR>
<TD>
<DIV ALIGN="center">
<TABLE BORDER="2" CELLPADDING="0" CELLSPACING="0">
<TR>
<TD>
<TABLE BORDER="0" CELLPADDING="5" CELLSPACING="0" BGCOLOR="EDDDC5">
<TR>
<TD>
<FONT FACE="verdana" SIZE="2">
Namn:
</FONT>
</TD>
<TD>
<INPUT TYPE = "TEXT" NAME = "UserID" SIZE = 20>
</TD>
</TR>
<TR>
<TD>
<FONT FACE="verdana" SIZE="2">
Lösen:
</FONT>
</TD>
<TD>
<INPUT TYPE = "PASSWORD" NAME = "pwd" SIZE = 20>
</TD>
</TR>
<TR>
<TD COLSPAN="2">
<CENTER>
<INPUT TYPE="SUBMIT" VALUE="Logga in" NAME="skicka" >
</FORM>
</CENTER>
</TD>
</TR>
</TABLE>
</TABLE>
</DIV>
</TR>
</TD>
</TABLE>
</BODY>
</HTML>

------------------
/Sophie*

Medlem sedan dec. 20003 563 inlägg
#27

Skippa databasen och skriv bara istället för databaskopplingen:

<%
response.write request.form("pwd")
response.write request.form("UserID")
%>

------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

Medlem sedan juni 20019 024 inlägg
#28

Jepp, helt klart cyprys!
Sömn är bara för mesar, det kan man göra i graven!

---

Om inte ...

strUserID = rs("UserID")
response.Write strUserID

... fungerar (alltså precis efter du öppnat databasen) så är det fel på db:n någonstans.

------------------
Peter D

Medlem sedan juni 20019 024 inlägg
#29
<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "DSN=databas;UID=;PWD="
%>

Detta gör väl ingen nytta? Bort med skiten! ;)

------------------
Peter D

Medlem sedan okt. 20005 273 inlägg
#30
<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "DSN=databas;UID=;PWD="
SQL = "SELECT * From personer WHERE UserID = '" & Request.Form("UserID") & "' AND losenord = '"&Request.form("pwd")&"' "
rs.Open SQL, MinCon, 1, 2
If rs.EOF Then
Response.Redirect "../annansida.html"
End If
strUserID = rs("UserID")
Response.Write strUserID
rs.Close
SET rs = Nothing
%>

det du gör är ju att kolla om Usern har ett giltigt pwd och har den det så kan du ju använda Request.Form("UserID") igen eller, har jag fel ??

------------------
I like ¼ £ whith cheese

[Redigerat av icaaq den 24 jul 2001]

Medlem sedan sep. 2000206 inlägg
#31

sen kommer då framesidan

<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "DSN=databas;UID=;PWD="
SQL = "SELECT * From personer WHERE UserID = '" & Request.Form("UserID") & "'"
rs.Open SQL, MinCon, 1, 2
If rs.EOF Then
Response.Redirect "../annansida.html"
End If
If Not rs("losenord") = Request.Form("pwd") Then
Response.Redirect "../annansida.html"
End If

rs.Close
SET rs = Nothing
%>

<html>

<head>
<meta name="robots" content="noindex">
</head>

<frameset rows="64,*">
<frame name="banner" scrolling="no" noresize target="contents" src="banner.asp">
<frameset cols="150,*">
<frame name="contents" target="main" src="meny.asp">
<frame name="main" src="valkommen.asp?UserID=<%=UserID%>">

</frameset>
<noframes>
Du behöver en nyare browser som stödjer frames.
</body>
</noframes>
</frameset>
</html>

*ha ha* Fråga mig inte vad jag gör! För det har jag INGEN som helst aning om ;-)

Databasen funkar eftersom att jag kör mycket annat mot den. Det jag har överst på denna sida har jag i ett annat sammanhang också och där funkar det!! Nä usch nu får jag dåligt samvete över att ni är så snälla och hjälper till när jag inte själv kan hjälpa till =(

------------------
/Sophie*

Medlem sedan sep. 2000206 inlägg
#32

icaaq:

när jag skrev din kod så skrevs mitt UserID ut. Det var juh ganska bra vettja. Då finns det juh där.

------------------
/Sophie*

Medlem sedan dec. 20003 563 inlägg
#33

Om du kollar i databasen, antar att det är access. Vad är fälten password och UserID för typ. Tal eller text?

------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

Medlem sedan okt. 20005 273 inlägg
#34

va bra..då skriver du bara ut länken

<frame name="main" src="valkommen.asp?UserID=<%=strUserID%>">

:)

------------------
I like ¼ £ whith cheese

Medlem sedan sep. 2000206 inlägg
#35

Ja just det... På den andra sidan så hade jag tal, på denna sida är det text som UserID... Skall se om jag förstår hur man gör då...

------------------
/Sophie*

Medlem sedan dec. 20003 563 inlägg
#36
<%
Set MinCon = Server.CreateObject("ADODB.Connection")
MinCon.Open "DSN=databas"
Set RS = MinCon.execute("SELECT * From personer WHERE UserID = " & Request.Form("UserID") & " AND losenord = '"&request.form("pwd")&"' ")
if rs.eof then
mincon.close
Set MinCon = nothing
set RS = nothing
response.redirect "../annansida.html"
end if
%>

Så här hade jag skrivit och jag hittar inget fel om det inte är andra datatyper i fälten.

[r]
Du har ju inte givit variabeln ett värde.
<frame name="main" src="valkommen.asp?UserID=<%=RS("UserID")%>">
[/r]

------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

[Redigerat av cyprys den 24 jul 2001]

[Redigerat av cyprys den 24 jul 2001]

Medlem sedan okt. 20005 273 inlägg
#37

jag tror inte rs("UserID") är ett tal ....tänk dig själv om du ska logga i som nr 1 :)

------------------
I like ¼ £ whith cheese

Medlem sedan juni 20019 024 inlägg
#38

Sophie, jag tycker nog att du ska ta och läsa en bok så att du förstår vad du gör - det kommer hjälpa dig otroligt mycket!

Kolla på http://www.idg.se/webstudio/asp

Där kan du förhoppningsvis snappa upp ett och annat.

------------------
Peter D

Medlem sedan okt. 20005 273 inlägg
#39

Pace svär inte....

kolla in www.webeye.nu istället....vide´s ASP skola rockar ju fett (iaf bra mycket bättre än Idg´s)

------------------
I like ¼ £ whith cheese

Medlem sedan dec. 20003 563 inlägg
#40

Jag brukar logga in användare som nummer.
Mycket lättare att hålla isär då eftersom varje användare har en unikt värde.
* Låter lite trött nu

Visserligen brukar jag aldrig använda querystring för sådana ändamål.

[REDIGERAR STORT]
INNNTTTEEE IDDGG!!
Då kommer du komma tillbaka med fler problem.
Känns som hälften av alla problem här på webforum härstammar från IDG/webstudio
Håller med. Gå på Vides skola istället.
Riktigt bra.
[REDIGERAR]
------------------
MVH // Cyprys
Cyprys
Synd att du inte kan köpa en voodoojordglob och sedan snurra på den fort som fan och skrämma skiten ur alla.

[Redigerat av cyprys den 24 jul 2001]

273 ms totalt · 4 externa anrop · v20260731065814-full.86ec41c2
136 ms — deklarationer (db)
0 ms — hämta statistik (cache)
134 ms — hämta tråd, inlägg och bilagor (db)
134 ms — ändringar (db)