CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

fastpoint Nybegynder

26. juli 2002 - 11:01 Der er 18 kommentarer og
1 løsning

Fejl i mit script?

denne kode skulle gerne gå ind i databasen og ændre i tabellen fra nej til ja.... [dvs.. i databasen klikker man på jwringetoner for at åbne tabellen og så er der en fane der hedder [godkend]
kan i se fejlen?

<%option explicit%>

<%
dim connection,id,SQLstringK

Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")

id = Trim(Request.QueryString("id"))

SQLstringK="UPDATE jwringetoner SET godkendt='"&Request.QueryString("Ja")&"' WHERE id="&id
Connection.Execute(SQLstringK)
response.buffer=true
response.clear
response.redirect "godkend.asp"
response.end
%>

Synes godt om

stig3 Mester

26. juli 2002 - 11:03 #1

En god ide er jo altid at skrive din SQL ud og se hvad du egentlig sender til databasen.

Synes godt om

cape Nybegynder

26. juli 2002 - 11:03 #2

Hvad siger fejlen ?

Synes godt om

stig3 Mester

26. juli 2002 - 11:04 #3

Hvis det er et true/false felt mener jeg ikke at der skal plinger om (')

Synes godt om

tmceu Praktikant

26. juli 2002 - 11:07 #4

Du skal bruge true/false eller -1/0 uden pinger om for true/false værdier.

Synes godt om

fastpoint Nybegynder

26. juli 2002 - 11:10 #5

dette script skal godkende ringetoner i databasen... hvis der ikke står ja i godkendt så kan man ikke se dem på siden.. den kommer ikke med nogen fejl... den skriver bare ikke noget som helst i feltet godkendt

Synes godt om

fastpoint Nybegynder

26. juli 2002 - 11:12 #6

den her som jeg bruger i et mindre script virker fint...

<%option explicit%>

<%
dim connection,id,SQLstringK

Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")

id = Trim(Request.QueryString("id"))

SQLstringK="UPDATE data SET Approved=true WHERE id=" & id
Connection.Execute(SQLstringK)
response.buffer=true
response.clear
response.redirect "godkend.asp"
response.end
%>

Synes godt om

tmceu Praktikant

26. juli 2002 - 11:15 #7

Prøv at ændre dit script til dette:

<%option explicit%>

<%
dim connection,id,SQLstringK

Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")

id = Trim(Request.QueryString("id"))

SQLstringK="UPDATE jwringetoner SET godkendt='"&Request.QueryString("Ja")&"' WHERE id="&id

Response.Write "Querystring: " & Request.QueryString("Ja") & " "
Response.Write "SQL statement: " & SQLstringK
Response.End

Connection.Execute(SQLstringK)
response.buffer=true
response.clear
response.redirect "godkend.asp"
response.end
%>

Det udskriver værdien af feltet fra din querystring og det færdige SQL statement. Det kunne lyde som om eks. Request.QueryString("Ja") er tom.

Synes godt om

fastpoint Nybegynder

26. juli 2002 - 11:18 #8

hmm det hjalp ikke.... jeg tjecker lige i database designet hvilket type datafelt det er...

Synes godt om

mccannon Nybegynder

26. juli 2002 - 11:18 #9

jeg vil bakke op omkring tmceu <-- hvad pokker står det for ? ;)
Det virker altid når man bruger 1/0 værdier i en db når man bruge de der ja/nej true/false oplysninger

Synes godt om

fastpoint Nybegynder

26. juli 2002 - 11:21 #10

det er et text felt ikke et Yes/No felt

Synes godt om

cape Nybegynder

26. juli 2002 - 11:22 #11

Prøv nu det tmceu skriver.....

Synes godt om

tmceu Praktikant

26. juli 2002 - 11:22 #12

Det er såmænd et navn jeg i sin tid måtte tage på AOL, da der var så mange der hed Thomas et eller andet. Det er en forkortelse af mit navn + postfixet med eu for Europa, da jeg primært bevægede mig i amerikanske kredse. Navnet er så hængt ved som mit generelle handle de fleste steder og man kan jo desværre ikke ændre handle herinde :-)

Synes godt om

tmceu Praktikant

26. juli 2002 - 11:24 #13

Et tekstfelt skal omgives af pinger. Da du ikke får nogen syntaksfejl og ikke kan se noget i feltet, er jeg helt 100 på at Request.QueryString("ja") er tom. Dette vil nemlig give flg. statement der indsætter en blank værdi:

UPDATE jwringetoner SET godkendt='' WHERE id=XX

Synes godt om

fastpoint Nybegynder

26. juli 2002 - 11:25 #14

jeg har ændret det til et Yes/No felt men jeg får denne fejl nu

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

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

/indsaet.asp, line 152

her er scriptet

<html>
<head>
<title>d</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<link rel="stylesheet" href="styles.css" type="text/css">
</head>
<body bgcolor="#FFFFFF" text="#000000" link="#006699" vlink="#006699" alink="#006699">
<table border="0" width="700" bgcolor="#000000" cellspacing="1" cellpadding="0" align="center">
<tr>
<td width="100%" bgcolor="#FFFFFF" valign="top">
<table width="100%" border="0" cellspacing="0" cellpadding="3">
<tr bgcolor="#FFFFFF">
<td width="50%">JWRingelink
1.0 ASP</td>
<td align="right" valign="bottom" nowrap width="50%">
<div align="right"></div>
</td>
</tr>
</table>
</td>
</tr>
</table>
<table border='0' cellspacing='0' cellpadding='0' width='700' align="center" height="19">
<tr>
<td width='1' valign='top' bgcolor='#000000'><img src="images/intet.gif" width='1'></td>
<td width='698' valign='top' bgcolor='#f7f7f7'>
<table width="100%" border="0" cellspacing="4" cellpadding="0">
<tr>
<td width="59%"><a href="index.asp">[
Hjem</a> |
<a href="ringetoner.asp?alfa=ABCD">Ringetoner</a>
|
<a href="topliste.asp">Top40</a>
| <a href="nye.asp">Nyeste</a>
| <a href="indsaet.asp">Tilføj
</a>|
 <a href="admin/login.asp" target="_self">Admin
</a> ]
</td>
<td width="41%">
<div align="right"></div>
</td>
</tr>
</table>
</td>
<td width='1' valign='top' bgcolor='#000000'><img src="intet.gif" width='1'></td>
</tr>
</table>
<table border="0" width="700" bgcolor="#000000" cellspacing="1" cellpadding="0" align="center">
<tr>
<td bgcolor="#FFFFFF" valign="top" colspan="2">
<div align="center"> 
<form action="indsaet.asp" method="post">
<table width="400" border="0" cellspacing="1" cellpadding="3" class="bottom" align="center" bgcolor="#f7f7f7">
<tr>
<td width="134">Dit
Navn * 
<input type="text" name="navn" class="bottom">
</td>
<td width="251">Email: 
<input type="text" name="email" class="bottom">
</td>
</tr>
<tr>
<td width="134">Ringetonens
Navn * 
<input type="text" name="tonenavn" class="bottom">
</td>
<td width="251">Tempo:* 
<select size="1" name="tempo" class="ramme" style="border: 1 solid #000000">
<option value="Vælge Selv" selected>For
Nokia</option>
<option value="40 BPM">40 BPM</option>
<option value="45 BPM">45 BPM</option>
<option value="50 BPM">50 BPM</option>
<option value="56 BPM">56 BPM</option>
<option value="63 BPM">63 BPM</option>
<option value="70 BPM">70 BPM</option>
<option value="80 BPM">80 BPM</option>
<option value="90 BPM">90 BPM</option>
<option value="100 BPM">100 BPM</option>
<option value="112 BPM">112 BPM</option>
<option value="125 BPM">125 BPM</option>
<option value="140 BPM">140 BPM</option>
<option value="160 BPM">160 BPM</option>
<option value="180 BPM">180 BPM</option>
<option value="200 BPM">200 BPM</option>
<option value="225 BPM">225 BPM</option>
</select>
</td>
</tr>
<tr>
<td colspan="2" height="167">
Nokia *
 

<textarea name="rnokia" cols="50" rows="8" class="bottom"></textarea>
</td>
</tr>
<tr>
<td colspan="2" height="167">
Siemens *
 

<textarea name="rsiemens" cols="50" rows="8" class="bottom"></textarea>
</td>
</tr>
<tr>
<td colspan="2" height="167">
Ericsson *
 

<textarea name="rericsson" cols="50" rows="8" class="bottom"></textarea>
</td>
</tr>
<tr>
<td colspan="2">

<table border="0" cellspacing="0" cellpadding="0" width="200">
<tr>
<td align="left">
<div align="left">
*
= Skal indtastes</div>
</td>
</tr>
</table>
</td>
</tr>
</table>
 
<table border="0" cellspacing="0" cellpadding="0" width="400">
<tr>
<td>
<div align="center">
<input type="Submit" value="Tilføj" name="Submit">
<input type="Reset" value="Slet Alt" name="Reset">
</div>
</td>
</tr>
</table>
</form>
<%
If Trim(Request("navn")) > "" Then
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath ("database.mdb")
Conn.Open DSN
if request("navn") = "" OR request("tonenavn") ="" OR request("tempo") ="" OR request("rsiemens")="" OR request("rericsson")="" then
response.write("Du mangler at indtaste en oplysning")
else
Conn.Execute "INSERT INTO jwringetoner (navn,email,tonenavn,tempo,rnokia,rsiemens,rericsson,hits,godkendt,kl,dato,ip) VALUES ('" & Request("navn") & "','" & Request("email") & "','" & Request("tonenavn") & "','" & Request("tempo") & "','" & Request("rnokia") & "','" & Request("rsiemens") & "','" & Request("rericsson") & "','0','Nej','" & time() & "','" & date() & "','" & Request("REMOTE_ADDR") & "')"

Conn.Close: Set Conn = Nothing

Response.Write "<h1>Tak for din ringetone - din ringetone er blevet sat til at blive accept hos webmasteren!</h1>"
%>
<% End If %>
<% end if %>



 
</div>
</td>
</tr>
</table>

Synes godt om

mccannon Nybegynder

26. juli 2002 - 11:29 #15

ændre det til et talfelt
brug 1 og 0 som værdi

1 kunne være = ja når du henter de ud fra db'en og 0 kunen være = nej når du henter det ud
det samme når du sætter det ind i db'en

Synes godt om

tmceu Praktikant

26. juli 2002 - 11:32 #16

Prøv med denne efter du har ændret datatype:

Conn.Execute "INSERT INTO jwringetoner (navn,email,tonenavn,tempo,rnokia,rsiemens,rericsson,hits,godkendt,kl,dato,ip) VALUES ('" & Request("navn") & "','" & Request("email") & "','" & Request("tonenavn") & "','" & Request("tempo") & "','" & Request("rnokia") & "','" & Request("rsiemens") & "','" & Request("rericsson") & "','0',false,'" & time() & "','" & date() & "','" & Request("REMOTE_ADDR") & "')"

false skal evt. erstattes af 0

Synes godt om

fastpoint Nybegynder

26. juli 2002 - 11:58 #17

okay jeg har ændret det til number nu... men når jeg ændre "JA" til "1" så virker siden ikke... skal jeg ændre på scriptet nu hvor jeg har lavet om i databasen?

<%option explicit%>

<%
dim connection,id,SQLstringK

Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")

id = Trim(Request.QueryString("id"))

SQLstringK="UPDATE jwringetoner SET godkendt='"&Request.QueryString("Ja")&"' WHERE id=" & id
Connection.Execute(SQLstringK)
response.buffer=true
response.clear
response.redirect "godkend.asp"
response.end
%>

Synes godt om

tmceu Praktikant

26. juli 2002 - 12:00 #18

Du skal ikke bruge pinger om nummeriske felter, så prøv med denne:

SQLstringK="UPDATE jwringetoner SET godkendt="&Request.QueryString("Ja")&" WHERE id=" & id

Synes godt om

fastpoint Nybegynder

26. juli 2002 - 12:04 #19

<%option explicit%>

<%
dim connection,id,SQLstringK

Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("../database.mdb")

id = Trim(Request.QueryString("id"))

SQLstringK="UPDATE jwringetoner SET godkendt=(1) WHERE id=" & id
Connection.Execute(SQLstringK)
response.buffer=true
response.clear
response.redirect "godkend.asp"
response.end
%>

jeg fik det til at virke med den kode der... tak for hjælpen alle sammen!

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

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
Classic - filer vist med sidste fil først Af bsn i ASP	5	23/05/202409:56	24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP	4	26/04/202417:16	26/04/202418:37
JSON Af ingeman i ASP	3	07/04/202417:53	08/04/202412:09
Vis detaljeret fejlkoder Af poulmadsen i ASP	6	09/03/202418:16	10/03/202417:59
IIS virker ikke på asp sider... Af bsn i ASP	10	15/10/202313:12	18/10/202308:48

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS