More SQL assistance needed...

[TonyU]

[tt]
Here's what I'm trying to do in my SQL database.

I need to format a unique numbering system for this site which will look like this

Unique Account Number
Year - Month - User Initials & 001



Here's what I have done so far
<%

curDate = Now()
pyy = Year(curDate)
pmm = Month(curDate)
pui = request.cookies(&quot;initials&quot
if len(bidmm) = 1 Then
bidmm = &quot;0&quot; & bidmm
end if

Dim MyRs
Set MyRs = Server.CreateObject(&quot;ADODB.Recordset&quot
SQL = &quot;Select accnumber from tbl Where accnumber like '&quot; & pyy & pmm & &quot;%&quot; and initials = &quot; pui
MyRs.open SQL, &quot;DSN=proposal&quot;

if MyRs.eof or MyRs.bof
fullaccnumber = pyy & pmm & &quot;001&quot;
else
fullaccnumber = MyRs + 1
end if
response.write fullaccnumber
%>



Error I'm getting and can't find it
Error Type:
Microsoft VBScript compilation
Unterminated string constant
Line 17
Line 17 = SQL = &quot;Select accnumber from tbl Where accnumber like '&quot; & pyy & pmm & &quot;%&quot; and initials = &quot; pui




[sup]

T ® Ñ ¥
To keep a lamp burning we have to keep puting oil in it.

​

[/sup]

 

[onpnt]

SQL = &quot;Select accnumber from tbl Where accnumber like '&quot; & pyy & pmm & &quot;%&quot; and initials = &quot; pui

count the quotes matching single to double.

_________________________________________________________
for the best results to your questions: FAQ333-2924
[sub]01001111 01101110 01110000 01101110 01110100[/sub]

[sup]

http://www.onpntwebdesigns.com/newsite/index.asp

[/sub]

 

[mww22]

Here try this statement below copy and paste it and it will work.... But only if accunumber is not a string made by concatenating pyy, pmm and pui....


&quot;Select
accnumber
from
tbl
Where
accnumber like '%&quot; pyy & pmm & &quot;%'&quot;
& &quot;and initials = '&quot; & pui & &quot;'&quot;

 

[TonyU]

[tt]I got it working yesterday. thanks guys

[sup]

T ® Ñ ¥
To keep a lamp burning we have to keep puting oil in it.

​

[/sup]