webForumDet fria alternativet

Dialogruta Ok/Avbryt

18 svar · 304 visningar · startad av Biten

BitenMedlem sedan mars 2001131 inlägg
#1

Hej ..
Är det någon som kan hjälpa mig?
Jag har en delete länk som om jag klickar på den får jag fram en dialogruta som frågar om jag ska ta bort den aktuella posten i databasen.

koden för att ta bort den är:

IntCount = Request.QueryString "IntCount")
SQL = "DELETE FROM DB_TRAINING WHERE IntCount='" &IntCount& "'"
set rs = MinCon.execute(SQL)

men hur ska jag lägga in den i confirm.

@ndersMedlem sedan juni 200032 969 inlägg
#2

http://cgi.webforum.nu/wf/Forum11/HTML/003393.html

räckte inte det svaret, eller vad är det du inte förstår?

------------------
<A HREF="http://cartman.nu" TARGET=_blank>
all your base are belong to us!</A>

BitenMedlem sedan mars 2001131 inlägg
#3

Nej jag får fel medelande när jag kopierar det och lägger in det i confirm

om jag bara ska skicka det till en annan asp sida.....är det kanske lättare då?.....är det bara att skriva
location.href='Ok_sidan.asp'; då?

JohnsenMedlem sedan juli 2000836 inlägg
#4

Enklast vore väl:

<a href="radera.asp?IntCount='bla'" onClick="return confirm('säkert?');">Ta bort</a>

/ J

BitenMedlem sedan mars 2001131 inlägg
#5

OK.....men åter till min delete länk....
Den fungerar bra innanför asp taggar men i scriptet fungerar det inte....jag har aldrig gjort ett script förr....
ska det fungera smärtfritt om man bara Kopierar det till scriptet?

JohnsenMedlem sedan juli 2000836 inlägg
#6

Hur der din länk ut just nu?

BitenMedlem sedan mars 2001131 inlägg
#7

Den ser ut så här...

<TD><A href="./min_sida.asp?IntCount=<%=rs("IntCount")%>" onclick="javascript:del();">delete</A>

function del() {
if (confirm('Vill du ta bort raden?'))
IntCount = Request.QueryString("IntCount")
SQL = "DELETE FROM DB_TRAINING WHERE IntCount='" &IntCount& "'"
set rs = MinCon.execute(SQL)
Set rs = Nothing
}
return false;

hoppas du kan hjälpa mig....det är säkert inget svårt fel....det är nog bara att jag är ganska ny vad det gäller asp och javascript

JohnsenMedlem sedan juli 2000836 inlägg
#8

Du har blandat ASP och javascript!
Ta bort allt detta:

function del() {
if (confirm('Vill du ta bort raden?'))
IntCount = Request.QueryString("IntCount")
SQL = "DELETE FROM DB_TRAINING WHERE IntCount='" &IntCount& "'" 
set rs = MinCon.execute(SQL)
Set rs = Nothing
}
return false;

och ändra länken

<TD><A href="./min_sida.asp?IntCount=<%=rs("IntCount")%>" onClick="return confirm(''Vill du ta bort raden?');">delete</A>

SQL'en hör hemma på min_sida.asp-sidan. Det är ju där infon skall raderas.

BitenMedlem sedan mars 2001131 inlägg
#9

Ja ok....men jag har allt på ASP sidan....men menar du att jag inte behöver den SQL satsen för att ta bort en post?

JohnsenMedlem sedan juli 2000836 inlägg
#10

Jag menar att ASP exekveras på servern och javascript hos klienten.

Dina databaskopplingar och SQL-strängar till hör ASP-koden och skall inte blandas med javascriptkoden (något förenklat).

BitenMedlem sedan mars 2001131 inlägg
#11

OK...*ler*...då förstår jag......Tack!!!

BitenMedlem sedan mars 2001131 inlägg
#12

Jo det var en sak som inte fungerade perfekt......när jag klickat OK i dialogrutan så är länken kvar visserligen rödmarkerad men ändå kvar....hur gör jag för att uppdatera sidan så att tabellen visas utan den deletade posten direkt efter dialogrutan?

Tack för all hjälp

JohnsenMedlem sedan juli 2000836 inlägg
#13

Sker allt på samma asp-sida, eller har du en sida där du listar vad som kan raderas och en sida som sköter raderindgen?

BitenMedlem sedan mars 2001131 inlägg
#14

Allt sker på samma asp sida.
Vad ska jag göra?...(lite upgiven)...

BitenMedlem sedan mars 2001131 inlägg
#15

Det finns verkligen inget set som fungera.
Jag börjar snart gråta...tacka i alla fall ni som funderat över det...

JohnsenMedlem sedan juli 2000836 inlägg
#16

Vad ska jag göra?...(lite upgiven)...

Du skall visa hela din kod så skall det nog lösa sig.

BitenMedlem sedan mars 2001131 inlägg
#17

Du säger det johnsen det är alltid skönt när någon andas denna optimism. :)

Här kommer koden:

<TABLE WIDTH="80%" BORDER=0 CELLSPACING=0 CELLPADDING=0 align="center">

\<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open"DSN=databasen;UID=sa;PWD="
SQL = "SELECT \* FROM DB_TRAINING WHERE 1=2"
rs.Open SQL, MinCon,1,2

If Not Request.Form("Activity")="" Then
	rs.AddNew
	rs("SSN")=("741228-1993")
	rs("Activity")=Request.Form("Activity")
	rs("newDate")=dDate
	rs.Update
	rs.Close
Else
	rs.Close
End If
%\>
\<TR\>
    \<TD align="right"\>
		\<FONT COLOR="#000000" size=4\>Aktivitet:&nbsp;
		\<INPUT name="Activity" style="HEIGHT: 23px; WIDTH: 106px"\>&nbsp;&nbsp;\<INPUT  align="right" id=submit1 name=submit1 type=submit value=Bekräfta \>
		\</FONT\>\<BR\>
	\</TD\>
\<TR\>
	\<TD align="right"\>\<FONT COLOR=#ffff00 SIZE="-1"\>
	\<BR\>
	\<INPUT  type="button" value="Aktivitet/mån" id=button1 name=button1 OnClick= 'location.href="Inlogg.asp"' style="HEIGHT: 24px; WIDTH: 97px"\>&nbsp;&nbsp;
	\<INPUT type="button" value="Aktivitet/år" OnClick= 'location.href="DB_Kontakt.asp"'id=button2 name=button2 \>
\</TR\>\</TR\>\</LABEL\>\</TR\>\</TABLE\>\</TD\>\</TR\>\</TBODY\>\</TABLE\>
\<BR\>\<BR\>\<BR\>\<BR\>
	\<TABLE BORDER=0  align=center COLSPAN="3" style="HEIGHT: 54px; WIDTH: 300px"\>

<TR>
<TD ALIGN=middle><B>Datum</B>
<TD ALIGN=middle WIDTH="55%"><B>Aktivitet</B></TD>
<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open"DSN=databas;UID=sa;PWD="
SQL = "SELECT TOP 10 * FROM DB_TRAINING WHERE SSN = '741228-1993' ORDER BY IntCount DESC"
rs.Open SQL, MinCon

Do while Not rs.EOF	
dim IntCount
%\>
\<TR\>
\<TD\>\<%Response.write(rs("newDate"))%\>
\<TD\>\<%=rs("Activity")%\>
\<TD\>\<A href="./index.asp?IntCount=\<%=rs("IntCount")%\>" onClick="return confirm('Vill du ta bort raden?');"\>delete\</A\>
\<%rs.MoveNext
Loop
%\>
\</TD\>\</TR\>
\<%
IntCount = Request.QueryString("IntCount")
SQL = "DELETE FROM DB_TRAINING WHERE IntCount='" &IntCount& "'" 
MinCon.execute(SQL)
Set rs = Nothing	
%\>
\<%
MinCon.Close
%\>
JohnsenMedlem sedan juli 2000836 inlägg
#18

Detta blir dock inte javascript, så har du vidare problem föreslår jag ASP-forumet.

Lägg till en response.redirect efter MinCon.Close
Och eftersom du sa att du hade allt på samma sida förmodar jag att detta är index.asp, alltså:

<%
MinCon.Close
response.redirect "index.asp"
%>
BitenMedlem sedan mars 2001131 inlägg
#19

Tack så mycket Johnsen....jag ska komma ihåg dig i mitt testamente.. ;-)

145 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
142 ms — hämta tråd, inlägg och bilagor (db)