Søg
Avatar billede martin29 Nybegynder
23. marts 2005 - 08:34 Der er 18 kommentarer og
1 løsning

login og vis info på det ene medlem.

Hejsa!

Jeg har en access database som indeholde mine medlemmers informationer. Bl.a. deres brugernavn, telefon, og et ID.

Vil godt have en login funktion som tjekker om brugernavn og telefon passer på den ID som tilhører personen. Hvis det viser sig at disse 3 ting passer på den ene person skal alle medlems oplysninger vises på kun den ene person.

Er det muligt og evt hvordan?
Smider gerne 100 point til en færdig løsning.

Mangler det akut så håber på en hurtig hjælp.

Mvh
Martin
Avatar billede moejensen Nybegynder
23. marts 2005 - 08:43 #1
du kan starte her

Her er en god artikel om det du søger

http://activedeveloper.dk/artikler/default.asp?articleid=88

og her et konkret eksempel

http://activedeveloper.dk/download/default.asp?mode=showdownload&id=659
Avatar billede moejensen Nybegynder
23. marts 2005 - 08:46 #2
hvis du tager udgangspunkt i artiklens eksempel, så kan du bare skifte password ud med tlf. Er det menungen at bruegren også skal skrive deres id ind, eller er det ikke menungen at idet skal findes på baggrun af login oplysningerne brugernavn og tlf?
Avatar billede moejensen Nybegynder
23. marts 2005 - 08:47 #3
når brugeren er logget ind, gemmes brugerens id i Session("UserID"). Denne session kan du så senere bruge til at hente brugernes data ud.

ex.

SQL = "SELECT * FROM brugere WHERE id = "& Session("UserID")  &";"
Avatar billede martin29 Nybegynder
23. marts 2005 - 16:04 #4
Hejsa!

Du kan sikkert godt følge mine tanker om hvad jeg vil ud fra tidligere tråd.

Det skal være muligt for hver enkelt kunde og se hvor vidt deres ordre er. Altså om pengene er modtaget og om ordren er sendt. Det vil sige ud fra det qxl brugernavn de har + deres telefon nr skal de kunne logge ind og se en lille del af deres egne oplysninger.

Brugeren skal derfor kun skrive qxl navn og tlf. derefter skal ASP koden tjekke om det passer sammen og hente resten af indholdet på den enkelte bruger der er logget ind.

Men kigger lige på de links du har vedlagt, og har nu påsken til at "bygge" noget sammen. ;-)
Avatar billede martin29 Nybegynder
23. marts 2005 - 16:24 #5
SÅ er jeg tilbage igen. :-)

Det er i beskytte.asp jeg har indsat noget af følgende:

<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("login_2000.mdb")
SQL = "SELECT * FROM users WHERE id = "& Session("UserID")  &";"
set rs = Conn.execute(strSQL)

if rs.EOF then
Response.write "<font face=""Arial"" size=""2""><i>Der er ingen der har skrevet i tagwall`en...</i></font>"
else
Do Until rs.EOF
%>

Men får fejl på :
set rs = Conn.execute(strSQL)
Avatar billede martin29 Nybegynder
23. marts 2005 - 16:26 #6
fejlen er :

Microsoft OLE DB Provider for ODBC Drivers error '80040e0c'

Command text was not set for the command object.

/test/beskyttet.asp, line 12
Avatar billede martin29 Nybegynder
23. marts 2005 - 19:29 #7
Så nu kan jeg ikke komme videre uden hjælp..
Er faktisk færdig med koden med skal have hjælp til at ændre (TRUE og FALSE) Til JA eller NEJ

Her er koden i min beskyttet.asp

<!--#include file="protect.inc"-->
<% response.buffer = true %>
<html>
<head>
<style type="text/css">
<!--
.style4 {font-size: 80px;
    color: #D7D7D7;
    font-weight: bold;
}
.style6 {color: #CCCCCC; font-weight: bold; font-family: "Courier New", Courier, mono; font-size: 18px; }
body {
    background-color: #000000;
}
.style9 {
    font-family: "Courier New", Courier, mono;
    font-weight: bold;
}
.style10 {
    font-family: "Courier New", Courier, mono;
    font-weight: bold;
    color: #FF0000;
    font-size: 18px;
}
-->
</style>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head>
<body>
<p>test</p>
<div id="Layer3" style="position:absolute; left:229px; top:4px; width:350px; height:101px; z-index:3"><span class="style4">ShopFloor</span></div>
<div id="Layer4" class="style6" style="position:absolute; left:428px; top:83px; width:366px; height:32px; z-index:4">Din garanti for en god handel</div>
<p>&nbsp;</p>
<p>&nbsp;</p>
<p align="center">&nbsp;</p>
<p align="center"><br>
  <span class="style10">Hvor langt er min ordre.</span></p>
<HR color="#CCCCCC" width="400">
<br>
<br> 

<p> 
  <%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("login_2000.mdb")
strSQL = "SELECT * FROM users WHERE UserId = "& Session("UserId")  &";"
Set rs = Conn.Execute(strSQL)

if rs.EOF then
Response.write "<font face=""Arial"" size=""2""><i>Der er ingen informationer</i></font>"
else
Do Until rs.EOF
%>

<form name="TrackTraceForm" method="post" action="http://www.postdanmark.dk/tracktrace/TrackTrace.do" target="_blank" onsubmit="return dd();">   
<table align="center" width="604" border="0" cellspacing="0" cellpadding="0">
  <tr>
    <td width="293"><span class="style6">Velkommen</span></td>
    <td width="36"><span class="style6"></span></td>
    <td width="210"><span class="style10"><%=RS("Navn")%></span></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td><span class="style6">Indbetaling er modtaget: </span></td>
    <td><span class="style6"></span></td>
    <td><span class="style10"><%=RS("Penge")%></span></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td><span class="style6">Pakke sendt:</span></td>
    <td><span class="style6"></span></td>
    <td><span class="style10"><%=RS("Sendt")%></span></td>
  </tr>
  <tr>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
    <td>&nbsp;</td>
  </tr>
  <tr>
    <td><span class="style6">Track &amp; Trace Nr:</span></td>
    <td>&nbsp;</td>
    <td><span class="style10"><input type="text" name="barcode" maxlength="35" size="35" value="<%=RS("Tt")%>"></span></td>
    <td width="65"><div align="center"><input class="contentknap" type="submit" name="Search" value="S&oslash;g"></div></td>
  </tr>
</table>

<%RS.MoveNext
Loop
end if

Conn.Close
Set Conn = Nothing%>

</body>
</html>
Avatar billede moejensen Nybegynder
25. marts 2005 - 12:11 #8
tænker du på at lave det her:

If variabel = True then
  variabel = Ja
Else
  variabel = Nej
End If
Avatar billede moejensen Nybegynder
25. marts 2005 - 12:12 #9
hvis det ex er: RS("Sendt") så skriver du

If RS("Sendt") = True Then
  strSend = "Ja"
Else
  strSend = "Nej"
End If

Der hvor du skal buge den skriver du

<td><span class="style10"><%=strSend%></span></td>
Avatar billede martin29 Nybegynder
25. marts 2005 - 14:12 #10
Hejsa!

Fik løst problemet i går med:
<%if rs("Sendt") = True then response.write("JA") else Response.write("Nej") %>

Men ved ikke hvor forskellen ligger i de 2 koder.
Altså hvad er bedst?

har et andet lille problem du kan hjælpe med?
Får en lille fejl nede i venstre hjørne af browser når jeg har trykket søg.

<form name="TrackTraceForm" method="post" target="popup" action="http://www.postdanmark.dk/tracktrace/TrackTrace.do" onsubmit="return dd();">   



  <tr>
    <td><span class="style6">Track &amp; Trace Nr:</span></td>
    <td>&nbsp;</td>
    <td><span class="style10"><input readonly="readonly" type="text" name="barcode" maxlength="35" size="35" value="<%=RS("Tt")%>"></span></td>
    <td width="65"><div align="center"><input onclick="window.open('','popup', 'width=550,height=450,left=10,top=10,')"  class="contentknap" type="submit" name="Search" value="S&oslash;g"></div></td>
  </tr>
Avatar billede moejensen Nybegynder
25. marts 2005 - 15:34 #11
det er stort set det samme, den løsning du har fundet er helt fin.

prøv at dobbeltklik på fejlen, så får du en beskrivelse af den.
Avatar billede martin29 Nybegynder
25. marts 2005 - 20:06 #12
Hmm fik en fejl som ikke kunne bruges til noget.
så jeg slettede onsubmit="return dd();" så nu virker det helt uden fejl.

Så nu blev jeg færdig med hele denne del af koden.
Tak for hjælpen. :-) Hvad skylder jeg nu hvor jeg har lavet det meste selv !-)

PS går og overvejer en funktion under kundelogin.
Her skal det være muligt for kunden og udskrive en faktura på købet?

Er faktisk lidt i tvivl om hvordan det skal laves for at det også ser pænt ud og at der bliver regnet med moms osv..
Har du et rigtig godt forslag på det?
Avatar billede moejensen Nybegynder
25. marts 2005 - 21:39 #13
Sæt din faktura op i tabeller, og tving dem til kun at være 650 - 700 px brede, så mener jeg det passer me det a4 ark når det bliver printet.
Avatar billede martin29 Nybegynder
26. marts 2005 - 15:30 #14
hvad nu hvis min kunde handler over 2 gange så har han 2 forskellige ID nr men samme login og tlf nr. Hvad sker der så?
Giver det ikke en konflikt?

Øhh jo lige et andet spørgsmål i forbindelse med faktura:

<%=RS("Pris")%> + <%=RS("Fragt")%>

Ved godt det ikke er sådan man stiller det op men er det muligt og + - / * de 2 øverste sammen?

og hvordan gør jeg hvis jeg vil sige:
<%=RS("pris")%> /1.25
Avatar billede martin29 Nybegynder
26. marts 2005 - 15:30 #15
smider lige de 100 point
Avatar billede moejensen Nybegynder
26. marts 2005 - 17:07 #16
du skal gøre det i asp

ex <% = CInt(Rs("Pris")) + CInt(Rs("Fragt"))%>

eller

<%=cint(RS("pris"))/1.25%>
Avatar billede martin29 Nybegynder
26. marts 2005 - 17:51 #17
Kan ikke få disse linier til at virke:

får følgende fejl:
Microsoft VBScript runtime error '800a0006'
Overflow: 'CInt'
/tracktrace/faktura.asp, line 154




<% = CInt(Rs("Beløb")) + CInt(Rs("Fragt")) - CInt(Rs("Beløb")) + CInt(Rs("Fragt"))/1.25%>

<% = CInt(Rs("Beløb")) + CInt(Rs("Fragt"))/1.25%></div>

<% = CInt(Rs("Beløb")) + CInt(Rs("Fragt"))%>
Avatar billede martin29 Nybegynder
26. marts 2005 - 18:30 #18
UPS sorry en komma fejl.

<% = CInt(Rs("Beløb")) + CInt(Rs("Fragt")) - CInt(Rs("Beløb")) + CInt(Rs("Fragt"))/1.25%>

Mit beløb er 1655
fragt er 55

det regner den fint sammen til 1710

Men 1710/1,25 regner den til 1699??
Avatar billede martin29 Nybegynder
26. marts 2005 - 19:24 #19
har fået løst problemet. tak for hjælpen.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 9 25/06/202622:20 29/06/202621:55
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 13:55 Ukendt sender e-mails fra - og til min e-mail adresse Af mort1 i Andet sikkerhed
24/0711:08 Forskel mellem klokkeslet start aften slut næste morgen Af krasmussen i Excel
23/0715:10 WINDOWS KOMPABILITET Af snestrup2000 i Windows
22/0720:19 DVB T2 tuner med optagefunktion Af ErikHg i Andet hardware
20/0716:00 Fildeling mellem 2 windows 11 systemer Af knudg i Windows
White papers
Flere white papers »