lufsa fyrir 21 árum, 11 mánuðum Fjöldi lestra: 203

SQL

Er að með eftirfarandi kóða sem er ekki alveg að virka hjá mér!
Finn ekki villuna, það sem þessi kóði á að gera er að opna gagnagrunninn og ná í þær færslur sem verið er að kalla í. Virkar eins og leitarstrengur.

Dim GognS
Set GognS = Tenging.Execute(“Select * from TaflaÍGagnagrunni”)
Select Count (DálkurÍGagnagrunni) from TaflaÍGagnagrunni

Þarf ég ný gleraugu?

Kveðja
LL

ask fyrir 21 árum, 11 mánuðum

<%
' Þetta er allt í fínasta lagi sýnist mér
Dim GognS
Set GognS = Tenging.Execute(“Select * from TaflaÍGagnagrunni”)
' Ég fatta ekki aftur á móti afhverju það kemur bara sql setning hér upp úr þurru?? :)
Select Count (DálkurÍGagnagrunni) from TaflaÍGagnagrunni
%>

Fyrri setning sækir öll gögn úr töflunni og svo notaru Tenging til þess að skella þessu í recordsett. Það er gott og gilt. Það sem ég fatta síðan ekki er hvað hin setningin er að gera þarna. :)

Hvað ertu að reyna gera?

kv.
Bergur ask | <a href="http://bergur.is“ target=”_blank“ style=”text-decoration:none;">bergur.is</a

Fyrra álit

lufsa fyrir 21 árum, 11 mánuðum

Kóðinn er nákvæmlega svona;
<%
dim GognS

'Setja fram SQL fyrirspurn. Hún skilar til baka gögnum úr grunninum'
Set GognS=Tenging.Execute(“Select Count(*) from TaflaÍGrunni Where DálkuríGrunni='Lokið'”)
'Birtir allt sem er lokið'

Set GognS=DBConnection.Execute(SQL)

Select Case GognS.eof
Case False
tempGognSCount=GognS.getrows
Set GognS=Nothing
Actual_Record_Count=Cdbl(UBound(tempGognSCount, 2))+1
Response.Write“ textitexti(” & Actual_Record_Count & “)Records 
Case True
Response.Write”Það fundust engar færslur“
End Select

Set GognS=Nothing
Response.Write” Gagnagrunni Lokað “
%>

og er hreinlega ekki að virka :)

Það sem ég er að reyna að gera er að ná færslur í gagnagrunninum sem eru merktar ”Lokið" í vissum dálk og fá þær til að birtast á síðunni…

Fyrra álit

lufsa fyrir 21 árum, 11 mánuðum

dim GognS

'Setja fram SQL fyrirspurn. Hún skilar til baka gögnum úr grunninum'
Set GognS=Tenging.Execute(“Select Count(*) from Verkbeidnir Where Stada='Lokið'”)
'Birtir allt sem er lokið'

Set GognS=DBConnection.Execute(SQL)

Select Case GognS.eof
Case False
tempGognSCount=GognS.getrows
Set GognS=Nothing
Actual_Record_Count=Cdbl(UBound(tempGognSCount, 2))+1
Response.Write“ Það eru engar(” & Actual_Record_Count & “)Records 
Case True
Response.Write”Það fundust engar færslur“
End Select

Set GognS=Nothing
Response.Write” Gagnagrunni Lokað "

Fyrra álit

ask fyrir 21 árum, 11 mánuðum

ok, ég sá nokkrar villur :)

hvort er tengingin við gagnagrunninn DBConnection eða tenging?
hvar er breytan SQL?, hún birtist hvergi. Það gleymdust nokkrar gæsalappir. Þetta aðallega það sem ég fann.

Ef tengingin við grunninn heitir DBConnection en ekki Tenging þá breytiru því bara í eftirfarandi kóða.

<%
dim GognS

'Setja fram SQL fyrirspurn. Hún skilar til baka gögnum úr grunninum'
set GognS = Tenging.Execute(“SELECT * FROM Verkbeidnir WHERE Stada='Lokið'”)

select case GognS.EOF
case false
tempGognSCount=GognS.getrows()
set GognS = nothing
Actual_Record_Count = Cdbl(UBound(tempGognSCount, 2) + 1)
Response.Write “Það eru engar (” & Actual_Record_Count & “) Records”
case true
Response.Write“Það fundust engar færslur”
end select
set GognS = nothing
Response.Write“Gagnagrunni Lokað”
%< ask | <a href="http://bergur.is“ target=”_blank“ style=”text-decoration:none;">bergur.is</a

Fyrra álit

lufsa fyrir 21 árum, 11 mánuðum

Já reyndi þetta, kóðin er ekki að telja færslurnar í gagnagrunninum og birta tölurnar. Er búin að breyta honum aðeins..

dim GognS

'Setja fram SQL fyrirspurn. Hún skilar til baka gögnum úr grunninum'
Set GognS=Tenging.Execute(“Select Count(Stada) from Verkbeidnir”)
'Birtir allt sem er lokið'

Select Case GognS.eof
Case True
tempGognSCount=GognS.getrows
Set GognS=Nothing
Actual_Record_Count=Cdbl(UBound(tempGognSCount, 2))+1
Response.Write“ Það eru:” & Actual_Record_Count & “Færslur ”
Case False
Response.Write“Það fundust engar færslur”
End Select

Set GognS=Nothing
Response.Write“ ”

Fyrra álit

ask fyrir 21 árum, 11 mánuðum

og virkar þetta semsagt núna? ask | <a href="http://bergur.is“ target=”_blank“ style=”text-decoration:none;">bergur.is</a

Fyrra álit

lufsa fyrir 21 árum, 11 mánuðum

Nei :)

Birtir ekki réttar niðurstöður, finnur bara 1 færslu.

Fyrra álit

ask fyrir 21 árum, 11 mánuðum

ok, en ég verð að viðurkenna að ég skil ekki alveg hvað þú villt að komi fram á síðunni :)

1. Ertu að reyna skrifa út fjölda færslna sem er Lokið
2. Ertu að reyna skrifa út færslurnar sem er Lokið
3. Ertu að reyna skrifa út fjölda færslna ásamt færslunum sjálfum sem er lokið
4. Eitthvað annað

kv.
Bergur ask | <a href="http://bergur.is“ target=”_blank“ style=”text-decoration:none;">bergur.is</a

Fyrra álit

lufsa fyrir 21 árum, 11 mánuðum

Er að reyna að gera nr. 1

Að fara inn í gagnagrunninn og telja allar þær færslur sem eru merktar LOKIÐ og fá heildartöluna fram á síðunni.

Fyrra álit

ask fyrir 21 árum, 11 mánuðum

Þessi kóði ætti að virka :) Ég prófaði hann á bergur.is og lét hann telja allar greinar sem ég hafði skrifað og hann gaf rétta tölu.

<%
dim GognRS
'Setja fram SQL fyrirspurn. Hún skilar til baka gögnum úr grunninum'
set GognRS = Tenging.execute(“SELECT * FROM Verkbeidnir WHERE Stada = ‘Lokid’ ”)

' Ef gögnin eru End Of File, þá er ekkert í recordsettinu GognRS
if GognRS.EOF then
Response.write(“Engar færslur”)
else
dim aGogn, nFjoldi
‘ Skellum recordsettinu í Array (fylki)
aGogn = GognRS.getRows()
’ Fáum fjöldan + 1, því array byrjar á 0
nFjoldi = UBound(aGogn, 2) + 1
‘ Hendum því yfir í double tölu
nFjoldi = CDbl(nFjoldi)
’Skrifum út
Response.write(“Það eru ” & nFjoldi & “ í færsur”)
end if

set GognRS = nothing
%>

kv. ask | <a href="http://bergur.is“ target=”_blank“ style=”text-decoration:none;">bergur.is</a

Fyrra álit

lufsa fyrir 21 árum, 11 mánuðum

Þú ert snillingur!!!

Virkar flott og allir farnir að brosa aftur!

Takk kærlega fyrir hjálpina :)

Fyrra álit

ask fyrir 21 árum, 11 mánuðum

Það var ekkert.

En þetta er samt skrítið, því að hinn kóðinn sem ég sendi inn virkaði líka, þ.e.a.s hjá mér.

allavega, gott að þetta virkar núna. ask | <a href="http://bergur.is“ target=”_blank“ style=”text-decoration:none;">bergur.is</a

Fyrra álit

ask fyrir 21 árum, 11 mánuðum

eitt annað sem mér datt í hug. Ef þú átt þarft bara að tékka hvort gögnin séu ekki til þá myndi ég bara setja upp if setningu í stað heillar Select Case setningar

if (GognS.EOF) then
dót
else
dóterí
end if

En þetta er nátturlega bara mismunandi smekkur. ask | <a href="http://bergur.is“ target=”_blank“ style=”text-decoration:none;">bergur.is</a

Fyrra álit

intenz fyrir 21 árum, 11 mánuðum

set GognRS = Tenging.execute(“SELECT count(*) AS asdf FROM Verkbeidnir WHERE Stada = ‘Lokid’”)

??? <a href=“mailto:gaui@gaui.is”>gaui@gaui.is</a> / <a href="http://www.gaui.is">www.gaui.is</a>

CS: [.GEGT1337.]gaui eða [TVAL]gaui
IRC: gaui

Gaui

Fyrra álit

Vefsíðugerð

Vefsíðugerð

Ofurhugar

Stjórnendur

Hverjir eru inni

Korkar - Vefforritun

SQL

Dýr

Dægurmál

Fræði

Leikir

Lífið

Lífsstíll

Margmiðlun

Menning

Skjár

Sport

Tónlist

Tækni

Vélar

Hugi