[asp][ms sql] select max probleem

Pagina: 1
Acties:

  • TeeDee
  • Registratie: Februari 2001
  • Laatst online: 21:19
hoi,

niet helemaal zeker of ie hier hoort maar hier komt mijn vraag/probleem.

Ik heb een sql server bij een kennis thuis staan. Nu probeer ik vanuit ultradev die connectie op te maken dmv een connection string:
code:
1
"PROVIDER=SQLOLEDB; DATA SOURCE=*.*.*.*; Initial Catalog=contentdb;User ID=username; password=password;"

Nu krijg ik constant bij het testen van die verbinding: http error code 401 unauthorized

Nu weet ik dat die kennis een firewall heeft. Maar een port scan toonde aan dattie voor mij 1433 open heeft staan.

Weet iemand wat er aan de hand is?

Heart..pumps blood.Has nothing to do with emotion! Bored


Verwijderd

dat heeft niks met je db te maken dnek ik hoor :)
je hebt gewoon geen rechten om die site op te vragen?

  • TeeDee
  • Registratie: Februari 2001
  • Laatst online: 21:19
mmm, vaag.

Op mijn eigen lan deed ie het nog wel gewoon perfect. Kon ik ook met ultradev connectie maken.

/edit: hmm, zou het te maken kunnen hebben met directory security die daaro gezet is?

Heart..pumps blood.Has nothing to do with emotion! Bored


Verwijderd

Op maandag 27 mei 2002 17:31 schreef TeeDee het volgende:
mmm, vaag.

Op mijn eigen lan deed ie het nog wel gewoon perfect. Kon ik ook met ultradev connectie maken.

/edit: hmm, zou het te maken kunnen hebben met directory security die daaro gezet is?
juist

  • TeeDee
  • Registratie: Februari 2001
  • Laatst online: 21:19
die heb ik er nu afgehaald en werkt ook niet.... :(

/edit: het had met een server instelling te maken aan de kant van ultradev....

Heart..pumps blood.Has nothing to do with emotion! Bored


  • TeeDee
  • Registratie: Februari 2001
  • Laatst online: 21:19
hmm... het gaat nog niet helemaal lekker:
code:
1
2
3
4
5
6
7
8
9
10
11
12
set rs_volgnummer = Server.CreateObject("ADODB.Recordset")
rs_volgnummer.ActiveConnection = MM_ConnTPG_STRING
rs_volgnummer.Source = "SELECT MAX (volgnummer) AS volgnummer FROM dbo.kaartbestellingen WHERE datum = '"&datum&"'"
rs_volgnummer.CursorType = 0
rs_volgnummer.CursorLocation = 2
rs_volgnummer.LockType = 3
rs_volgnummer.Open()
rs_volgnummer_numRows = 0

if not rs_volgnummer.eof then
if rs_volgnummer("volgnummer") < 1000 then
....

hij kan het volgnummer niet uitlezen... snap er geen fuck van.... :'(

Heart..pumps blood.Has nothing to do with emotion! Bored


  • robjanssen
  • Registratie: September 2001
  • Laatst online: 02-08 16:10

robjanssen

Software Developer

Probeer dit eens:
code:
1
2
3
4
5
6
7
8
9
10
11
set rs_volgnummer = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT MAX (volgnummer) AS volgnummer " _
     & "FROM dbo.kaartbestellingen " _
     & WHERE datum = '" & datum & "'"
rs_volgnummer.open strSQL, MM_ConnTPG_String, 3, 1

if not rs_volgnummer.eof then
  if CLng(rs_volgnummer("volgnummer").value) < 1000 then
    Response.Write("Joepie")
  end if
end if

  • TeeDee
  • Registratie: Februari 2001
  • Laatst online: 21:19
Op maandag 27 mei 2002 19:11 schreef robjanssen het volgende:
Probeer dit eens:
code:
1
2
3
4
5
6
7
8
9
10
11
set rs_volgnummer = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT MAX (volgnummer) AS volgnummer " _
     & "FROM dbo.kaartbestellingen " _
     & WHERE datum = '" & datum & "'"
rs_volgnummer.open strSQL, MM_ConnTPG_String, 3, 1

if not rs_volgnummer.eof then
  if CLng(rs_volgnummer("volgnummer").value) < 1000 then
    Response.Write("Joepie")
  end if
end if
Invalid use of Null: 'CLng' krijg ik dan

Heart..pumps blood.Has nothing to do with emotion! Bored


  • robjanssen
  • Registratie: September 2001
  • Laatst online: 02-08 16:10

robjanssen

Software Developer

Volgens mij gaat er dan iets mis met de datum.

Probeer dit eens:
code:
1
2
3
4
5
6
7
8
9
set rs_volgnummer = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT MAX (volgnummer) AS volgnummer " _
     & "FROM dbo.kaartbestellingen"
rs_volgnummer.open strSQL, MM_ConnTPG_String, 3, 1
if not rs_volgnummer.eof then
  if CLng(rs_volgnummer("volgnummer").value) < 1000 then
    Response.Write("Joepie")
  end if
end if

Waar en hoe vul je de variabele datum?

  • TeeDee
  • Registratie: Februari 2001
  • Laatst online: 21:19
Op maandag 27 mei 2002 19:20 schreef robjanssen het volgende:
Volgens mij gaat er dan iets mis met de datum.

Probeer dit eens:
code:
1

Waar en hoe vul je de variabele datum?
Aan het begin van de pagina.
code:
1
datum = day(now)&"-"&month(now)&"-"&year(now)

Ik weet dat het een ranzige manier is, maar ik kreeg zo 1,2,3 het datum veld goed aan de praat. Dus dacht ik, ik zet het als gewoon plain txt neer.

Maar ik heb nu in die db de "datum" op vandaag gezet. Wederom getest met Clng (en Cint, Cstr) en die werkten allemaal.

Verander ik die datum weer, dan krijg ik dat: Invalid use of 'null'

Heart..pumps blood.Has nothing to do with emotion! Bored


  • robjanssen
  • Registratie: September 2001
  • Laatst online: 02-08 16:10

robjanssen

Software Developer

Als je altijd de datum van vandaag moet hebben dan werkt onderstaande uitstekend:
code:
1
2
3
4
5
6
7
8
9
10
set rs_volgnummer = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT MAX(volgnummer) AS volgnummer " _
     & "FROM kaartbestellingen " _
     & "WHERE Datum = GETDATE()"
rs_volgnummer.open strSQL, MM_ConnTPG_String, 3, 1
if not rs_volgnummer.eof then
  if CLng(rs_volgnummer("volgnummer").value) < 1000 then
    Response.Write("Joepie")
  end if
end if

  • TeeDee
  • Registratie: Februari 2001
  • Laatst online: 21:19
Op maandag 27 mei 2002 19:29 schreef robjanssen het volgende:
Als je altijd de datum van vandaag moet hebben dan werkt onderstaande uitstekend:
code:
1
2
3
4
5
6
7
8
9
10
set rs_volgnummer = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT MAX(volgnummer) AS volgnummer " _
     & "FROM kaartbestellingen " _
     & "WHERE Datum = GETDATE()"
rs_volgnummer.open strSQL, MM_ConnTPG_String, 3, 1
if not rs_volgnummer.eof then
  if CLng(rs_volgnummer("volgnummer").value) < 1000 then
    Response.Write("Joepie")
  end if
end if
Idd, maar dan zou ie niet moeilijk moeten gaan doen als er nog niks staat voor vandaag. (want dan komt ie met die: invalid use of 'null')
En die rs_volgnummer.eof zou dat op moeten vangen, maar doet ie ook niet.
Geloof me, ik heb al van alles geprobeerd, maar het werkt gewoon niet lekker.

Heart..pumps blood.Has nothing to do with emotion! Bored


  • robjanssen
  • Registratie: September 2001
  • Laatst online: 02-08 16:10

robjanssen

Software Developer

Hier dan:
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
set rs_volgnummer = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT MAX(volgnummer) AS volgnummer " _
     & "FROM kaartbestellingen " _
     & "WHERE Datum = GETDATE()"
rs_volgnummer.open strSQL, MM_ConnTPG_String, 3, 1
If Not IsNull(rs_volgnummer("volgnummer").value) then
  If Clng(rs_volgnummer("volgnummer").value) < 1000 Then
    Response.Write("Er zijn vandaag minder dan 1000 bestellingen gedaan")
  Else
    Response.Write("Er zijn vandaag meer dan 1000 bestellingen gedaan")
  End If
Else
  Response.Write("Er zijn vandaag nog geen bestellingen geweest.")
End If

  • TeeDee
  • Registratie: Februari 2001
  • Laatst online: 21:19
snap er echt niks van. Bij mij stopt ie op de response.writes. Hij zet domweg gewoon niks neer...

/edit: kzie nu wat je gedaan hebt... nog een extra if er tussen gezet. Volgens mij kom hier iets verder mee idd... thanks..

/edit 2: hij werkt zo idd..
ik heb alleen de datum weer laten selecten op die ranzige manier van mij. Dit omdat het datum veld in de db geen datum veld is. Maar gewone text
Bedankt voor je hulp iig.

Heart..pumps blood.Has nothing to do with emotion! Bored

Pagina: 1