|
|
|
|
 |
|
food / 2000-10-20 / 오전 10:10:08 / 210.219.185.189
조회수 : 119
|
| [질문] 도와주세요 |
ADODB.Fields error '800a0cc1'
ADO가 응용 프로그램이 요청한 이름 또는 위치 참조에 해당하는 컬렉션에서 개체를 찾지 못했습니다.
/mem1/thanks.asp, line 38
이런 에러가 남니다
boranet
<%
'시리얼 넘버 생성엔진 소스----------------------------------
'**************************************************************************
'디비 커넥션이 없잖아요... dbcoonnection만 있으면 안되요..
set DBconnection = server.CreateObject("ADODB.connection")
DBconnection.Open ("DSN=sql;UID=sa;PWD=")
'위의 ADOdb커넥션 개체가 들어가야지 데이타베이스와 연결
'#################################################################################
sql = "select num from member order by num desc"
'커넥션 인자를 바꿔줬음 DBconnection
set aa = DBconnection.execute (sql)
if aa.EOF then
num_1 = 1 + 1 '넘버가 하나도 없으면
else
num_1 = 1 + aa("num") '넘버가 있으면 가장큰수의 +1 : 보라넷 전용
end if
'else
' num_1 = 1 + aa("no") '넘버가 있으면 가장큰수의 +1 지우지 말것
num = len(num_1) '넘버의 길이
response.write num_1 & "/" & aa("no")& "|"
totalnum = 13 - num '13자에서 빼기 넘버의 길이
Result = left("0000006000000" & CStr(Number), totalnum) '13자리숫자에서 남은 수 오른쪽부터 자르기
number = 1
response.write no_plus
serch_id = Result & num_1 '오른쪽부터 자른수 에 순차넘버 붙이기
response.write serch_id & "
"
'여기까지-------------------------------------------------
%>
<%time1 = date() & " " &hour(now) & ":" & minute(now) & ":" & second(now)%>
<%'로딘이 수정 SQL 로 날짜 만드는법...
Que = "select convert(varchar(24), getdate(), 113)"
Set Rs = DBconnection.Execute(QUE)
time2 = Rs(0)
%>
분명히 테이블안에 num 이라는 것이 있읍니다
아~하 어렵다
|
|
|
|