-
Error 800a0bcd
Hello,
I have went thru several messages from Igor and Frank and wondering if I have an old version? Currently I have Version: 6.2916 - Pro . In message from "Igor Soyfer 2/9/99 9:10:01 AM" Frank mentioned getting ver. 1314f Since my version is 6.2916 I am asuming it is newer so.... do I think it is a problem with my code. So here it is.
Set MyDb = Server.CreateObject("ASPdb.Pro"
MyDb.dbDSN="joeandal"
MyDb.dbUnit = 203
F = Request("tbl"
If F <> "" then
If Request("tbl" <> "" then Session("savedtbl" = Request("tbl"
If Request("state" <> "" then Session("savedstate" = Request("state"
If Request("county" <> "" then Session("savedcounty" = Request("county"
If Request("propertiessale" <> "" then Session("savedpropertiessale" = Request("propertiessale"
If Request("propertiesrent" <> "" then Session("savedpropertiesrent" = Request("propertiesrent"
MyDb.dbReset(203) 'Clear after you save your variables
End If
r="'"
If Session("savedpropertiessale" <> "" then
SQ = "Select * FROM company WHERE [properties/sale]=" & r & Session("savedpropertiessale" & r & "and approved = Yes"
Response.write "All listings for " & Session("savedpropertiessale" & "<BR>"
Session("savedpropertiessale" = ""
else
If Session("savedpropertiesrent" <> "" then
SQ = "Select * FROM company WHERE [properties/rent]=" & r & Session("savedpropertiesrent" & r & "and approved = Yes"
Response.write "All listings for " & Session("savedpropertiesrent" & "<BR>"
Session("savedpropertiesrent" = ""
else
' SQ = "Select * FROM " & Session("savedtbl" & " WHERE state=" & r & Session("savedstate" & r & "and approved = Yes and county=" & r & Session("savedcounty" & r & " Order by City"
SQ = "Select * FROM company WHERE state=" & r & Session("savedstate" & r & "and approved = Yes and county=" & r & Session("savedcounty" & r & " Order by City"
end if
end if
Mydb.dbSQL = SQ
response.write SQ
MyDb.dbMode="dual-horiz"
MyDb.dbColor = "White,Blue,LightSkyBlue,Blue"
MyDb.dbGridTableTag = "BORDER=1"
MyDb.dbGridDisplayFlds = "2,11,13"
'MyDb.dbMagicCell = "Price,align=right,format=[currency];email,,<A HREF=""mailto:#email#"">#email#;pi cture,,<A HREF=../aia/images/#picture#><IMG SRC=../aia/images/#picture# width=80 height=50 border=0></A>"
MC = "URL,,<A HREF=""#URL#"">#URL#;photo,,<A HREF=images/#photo#><IMG SRC=images/#photo# width=80 height=50 border=0></A>;email,,<A HREF=""mailto:#email#"">#email#;Pr ice,align=right,format=[currency]"
'MC = MC & ";customerid,,<A HREF=""detailp.asp?tbl=company&state=" & Session("savedstate" & "&county=" & Session("savedcounty" & "&customerid=#customerid#"">#customeri d#"
MC = MC & ";properties/sale,,<A HREF=""detailp.asp?tbl=homes"& "&agentfirm=#properties/sale#"">#properties/sale#"
MC = MC & ";properties/rent,,<A HREF=""detailr.asp?tbl=rentals"& "&customerid=#properties/rent#"">#properties/rent#"
'county,,<A HREF=""detailp.asp?tbl=" & Session("savedtbl" & "&state=" & Session("savedstate" & "&county=#county#"">#county# MyDb.dbFormDisplayFlds = "1,2,3,4"
MyDb.dbMagicCell = MC
MyDb.dbFormMemo = "8,9"
MyDb.dbMemoTextSize = -1
MyDb.dbFormDisplayFlds = "0,1,2,3,4,5,6,7,10,11,12,13,14,15,16,17,18,19 ,20,21,22,23"
'MyDb.dbFormMemo="Description" 'Show the memo field below the Form
MyDb.dbNavigationItem = "top,prev,next,bottom,reload"
'MyDb.dbFilterFlds = "1,2,3,4"
'MyDb.dbFilterParams = "Help=False"
'MyDb.dbFilterDropFlds="3,,Employees,Title ,,,,,Distinct; 4,,Employees,TitleOfCourtesy,,,,,Distinct; City,,Employees,City,,,,,Distinct; Country,,Employees,Country,,,,,Distinct"
'MyDb.dbCSVName = "myFile.csv"
'Response.write("Version: " & Mydb.dbVersion & "<P>"
MyDb.ASPdbPro
Thanks for your help
Allan
-
Error 800a0bcd (reply)
Your code -> "MyDb.ASPdbPro" indicates it is an old version. Please contact your sale agent to obtain the latest. If you then still have the problem then we can start the debugging process.
FK
------------
Allan at 7/9/01 12:35:10 PM
Hello,
I have went thru several messages from Igor and Frank and wondering if I have an old version? Currently I have Version: 6.2916 - Pro . In message from "Igor Soyfer 2/9/99 9:10:01 AM" Frank mentioned getting ver. 1314f Since my version is 6.2916 I am asuming it is newer so.... do I think it is a problem with my code. So here it is.
Set MyDb = Server.CreateObject("ASPdb.Pro"
MyDb.dbDSN="joeandal"
MyDb.dbUnit = 203
F = Request("tbl"
If F <> "" then
If Request("tbl" <> "" then Session("savedtbl" = Request("tbl"
If Request("state" <> "" then Session("savedstate" = Request("state"
If Request("county" <> "" then Session("savedcounty" = Request("county"
If Request("propertiessale" <> "" then Session("savedpropertiessale" = Request("propertiessale"
If Request("propertiesrent" <> "" then Session("savedpropertiesrent" = Request("propertiesrent"
MyDb.dbReset(203) 'Clear after you save your variables
End If
r="'"
If Session("savedpropertiessale" <> "" then
SQ = "Select * FROM company WHERE [properties/sale]=" & r & Session("savedpropertiessale" & r & "and approved = Yes"
Response.write "All listings for " & Session("savedpropertiessale" & "<BR>"
Session("savedpropertiessale" = ""
else
If Session("savedpropertiesrent" <> "" then
SQ = "Select * FROM company WHERE [properties/rent]=" & r & Session("savedpropertiesrent" & r & "and approved = Yes"
Response.write "All listings for " & Session("savedpropertiesrent" & "<BR>"
Session("savedpropertiesrent" = ""
else
' SQ = "Select * FROM " & Session("savedtbl" & " WHERE state=" & r & Session("savedstate" & r & "and approved = Yes and county=" & r & Session("savedcounty" & r & " Order by City"
SQ = "Select * FROM company WHERE state=" & r & Session("savedstate" & r & "and approved = Yes and county=" & r & Session("savedcounty" & r & " Order by City"
end if
end if
Mydb.dbSQL = SQ
response.write SQ
MyDb.dbMode="dual-horiz"
MyDb.dbColor = "White,Blue,LightSkyBlue,Blue"
MyDb.dbGridTableTag = "BORDER=1"
MyDb.dbGridDisplayFlds = "2,11,13"
'MyDb.dbMagicCell = "Price,align=right,format=[currency];email,,<A HREF=""mailto:#email#"">#email#;pi cture,,<A HREF=../aia/images/#picture#><IMG SRC=../aia/images/#picture# width=80 height=50 border=0></A>"
MC = "URL,,<A HREF=""#URL#"">#URL#;photo,,<A HREF=images/#photo#><IMG SRC=images/#photo# width=80 height=50 border=0></A>;email,,<A HREF=""mailto:#email#"">#email#;Pr ice,align=right,format=[currency]"
'MC = MC & ";customerid,,<A HREF=""detailp.asp?tbl=company&state=" & Session("savedstate" & "&county=" & Session("savedcounty" & "&customerid=#customerid#"">#customeri d#"
MC = MC & ";properties/sale,,<A HREF=""detailp.asp?tbl=homes"& "&agentfirm=#properties/sale#"">#properties/sale#"
MC = MC & ";properties/rent,,<A HREF=""detailr.asp?tbl=rentals"& "&customerid=#properties/rent#"">#properties/rent#"
'county,,<A HREF=""detailp.asp?tbl=" & Session("savedtbl" & "&state=" & Session("savedstate" & "&county=#county#"">#county# MyDb.dbFormDisplayFlds = "1,2,3,4"
MyDb.dbMagicCell = MC
MyDb.dbFormMemo = "8,9"
MyDb.dbMemoTextSize = -1
MyDb.dbFormDisplayFlds = "0,1,2,3,4,5,6,7,10,11,12,13,14,15,16,17,18,19 ,20,21,22,23"
'MyDb.dbFormMemo="Description" 'Show the memo field below the Form
MyDb.dbNavigationItem = "top,prev,next,bottom,reload"
'MyDb.dbFilterFlds = "1,2,3,4"
'MyDb.dbFilterParams = "Help=False"
'MyDb.dbFilterDropFlds="3,,Employees,Title ,,,,,Distinct; 4,,Employees,TitleOfCourtesy,,,,,Distinct; City,,Employees,City,,,,,Distinct; Country,,Employees,Country,,,,,Distinct"
'MyDb.dbCSVName = "myFile.csv"
'Response.write("Version: " & Mydb.dbVersion & "<P>"
MyDb.ASPdbPro
Thanks for your help
Allan
-
Error 800a0bcd (reply)
Thanks for the reply. What version is ASPDB PRO up to?
Allan
------------
Frank Kwong at 7/9/01 8:02:57 PM
Your code -> "MyDb.ASPdbPro" indicates it is an old version. Please contact your sale agent to obtain the latest. If you then still have the problem then we can start the debugging process.
FK
------------
Allan at 7/9/01 12:35:10 PM
Hello,
I have went thru several messages from Igor and Frank and wondering if I have an old version? Currently I have Version: 6.2916 - Pro . In message from "Igor Soyfer 2/9/99 9:10:01 AM" Frank mentioned getting ver. 1314f Since my version is 6.2916 I am asuming it is newer so.... do I think it is a problem with my code. So here it is.
Set MyDb = Server.CreateObject("ASPdb.Pro"
MyDb.dbDSN="joeandal"
MyDb.dbUnit = 203
F = Request("tbl"
If F <> "" then
If Request("tbl" <> "" then Session("savedtbl" = Request("tbl"
If Request("state" <> "" then Session("savedstate" = Request("state"
If Request("county" <> "" then Session("savedcounty" = Request("county"
If Request("propertiessale" <> "" then Session("savedpropertiessale" = Request("propertiessale"
If Request("propertiesrent" <> "" then Session("savedpropertiesrent" = Request("propertiesrent"
MyDb.dbReset(203) 'Clear after you save your variables
End If
r="'"
If Session("savedpropertiessale" <> "" then
SQ = "Select * FROM company WHERE [properties/sale]=" & r & Session("savedpropertiessale" & r & "and approved = Yes"
Response.write "All listings for " & Session("savedpropertiessale" & "<BR>"
Session("savedpropertiessale" = ""
else
If Session("savedpropertiesrent" <> "" then
SQ = "Select * FROM company WHERE [properties/rent]=" & r & Session("savedpropertiesrent" & r & "and approved = Yes"
Response.write "All listings for " & Session("savedpropertiesrent" & "<BR>"
Session("savedpropertiesrent" = ""
else
' SQ = "Select * FROM " & Session("savedtbl" & " WHERE state=" & r & Session("savedstate" & r & "and approved = Yes and county=" & r & Session("savedcounty" & r & " Order by City"
SQ = "Select * FROM company WHERE state=" & r & Session("savedstate" & r & "and approved = Yes and county=" & r & Session("savedcounty" & r & " Order by City"
end if
end if
Mydb.dbSQL = SQ
response.write SQ
MyDb.dbMode="dual-horiz"
MyDb.dbColor = "White,Blue,LightSkyBlue,Blue"
MyDb.dbGridTableTag = "BORDER=1"
MyDb.dbGridDisplayFlds = "2,11,13"
'MyDb.dbMagicCell = "Price,align=right,format=[currency];email,,<A HREF=""mailto:#email#"">#email#;pi cture,,<A HREF=../aia/images/#picture#><IMG SRC=../aia/images/#picture# width=80 height=50 border=0></A>"
MC = "URL,,<A HREF=""#URL#"">#URL#;photo,,<A HREF=images/#photo#><IMG SRC=images/#photo# width=80 height=50 border=0></A>;email,,<A HREF=""mailto:#email#"">#email#;Pr ice,align=right,format=[currency]"
'MC = MC & ";customerid,,<A HREF=""detailp.asp?tbl=company&state=" & Session("savedstate" & "&county=" & Session("savedcounty" & "&customerid=#customerid#"">#customeri d#"
MC = MC & ";properties/sale,,<A HREF=""detailp.asp?tbl=homes"& "&agentfirm=#properties/sale#"">#properties/sale#"
MC = MC & ";properties/rent,,<A HREF=""detailr.asp?tbl=rentals"& "&customerid=#properties/rent#"">#properties/rent#"
'county,,<A HREF=""detailp.asp?tbl=" & Session("savedtbl" & "&state=" & Session("savedstate" & "&county=#county#"">#county# MyDb.dbFormDisplayFlds = "1,2,3,4"
MyDb.dbMagicCell = MC
MyDb.dbFormMemo = "8,9"
MyDb.dbMemoTextSize = -1
MyDb.dbFormDisplayFlds = "0,1,2,3,4,5,6,7,10,11,12,13,14,15,16,17,18,19 ,20,21,22,23"
'MyDb.dbFormMemo="Description" 'Show the memo field below the Form
MyDb.dbNavigationItem = "top,prev,next,bottom,reload"
'MyDb.dbFilterFlds = "1,2,3,4"
'MyDb.dbFilterParams = "Help=False"
'MyDb.dbFilterDropFlds="3,,Employees,Title ,,,,,Distinct; 4,,Employees,TitleOfCourtesy,,,,,Distinct; City,,Employees,City,,,,,Distinct; Country,,Employees,Country,,,,,Distinct"
'MyDb.dbCSVName = "myFile.csv"
'Response.write("Version: " & Mydb.dbVersion & "<P>"
MyDb.ASPdbPro
Thanks for your help
Allan
-
Error 800a0bcd (reply)
The latest has ASP.db and X.ASPDB. Version is up to July 2001.
FK
------------
Allan at 7/10/01 10:48:54 AM
Thanks for the reply. What version is ASPDB PRO up to?
Allan
------------
Frank Kwong at 7/9/01 8:02:57 PM
Your code -> "MyDb.ASPdbPro" indicates it is an old version. Please contact your sale agent to obtain the latest. If you then still have the problem then we can start the debugging process.
FK
------------
Allan at 7/9/01 12:35:10 PM
Hello,
I have went thru several messages from Igor and Frank and wondering if I have an old version? Currently I have Version: 6.2916 - Pro . In message from "Igor Soyfer 2/9/99 9:10:01 AM" Frank mentioned getting ver. 1314f Since my version is 6.2916 I am asuming it is newer so.... do I think it is a problem with my code. So here it is.
Set MyDb = Server.CreateObject("ASPdb.Pro"
MyDb.dbDSN="joeandal"
MyDb.dbUnit = 203
F = Request("tbl"
If F <> "" then
If Request("tbl" <> "" then Session("savedtbl" = Request("tbl"
If Request("state" <> "" then Session("savedstate" = Request("state"
If Request("county" <> "" then Session("savedcounty" = Request("county"
If Request("propertiessale" <> "" then Session("savedpropertiessale" = Request("propertiessale"
If Request("propertiesrent" <> "" then Session("savedpropertiesrent" = Request("propertiesrent"
MyDb.dbReset(203) 'Clear after you save your variables
End If
r="'"
If Session("savedpropertiessale" <> "" then
SQ = "Select * FROM company WHERE [properties/sale]=" & r & Session("savedpropertiessale" & r & "and approved = Yes"
Response.write "All listings for " & Session("savedpropertiessale" & "<BR>"
Session("savedpropertiessale" = ""
else
If Session("savedpropertiesrent" <> "" then
SQ = "Select * FROM company WHERE [properties/rent]=" & r & Session("savedpropertiesrent" & r & "and approved = Yes"
Response.write "All listings for " & Session("savedpropertiesrent" & "<BR>"
Session("savedpropertiesrent" = ""
else
' SQ = "Select * FROM " & Session("savedtbl" & " WHERE state=" & r & Session("savedstate" & r & "and approved = Yes and county=" & r & Session("savedcounty" & r & " Order by City"
SQ = "Select * FROM company WHERE state=" & r & Session("savedstate" & r & "and approved = Yes and county=" & r & Session("savedcounty" & r & " Order by City"
end if
end if
Mydb.dbSQL = SQ
response.write SQ
MyDb.dbMode="dual-horiz"
MyDb.dbColor = "White,Blue,LightSkyBlue,Blue"
MyDb.dbGridTableTag = "BORDER=1"
MyDb.dbGridDisplayFlds = "2,11,13"
'MyDb.dbMagicCell = "Price,align=right,format=[currency];email,,<A HREF=""mailto:#email#"">#email#;pi cture,,<A HREF=../aia/images/#picture#><IMG SRC=../aia/images/#picture# width=80 height=50 border=0></A>"
MC = "URL,,<A HREF=""#URL#"">#URL#;photo,,<A HREF=images/#photo#><IMG SRC=images/#photo# width=80 height=50 border=0></A>;email,,<A HREF=""mailto:#email#"">#email#;Pr ice,align=right,format=[currency]"
'MC = MC & ";customerid,,<A HREF=""detailp.asp?tbl=company&state=" & Session("savedstate" & "&county=" & Session("savedcounty" & "&customerid=#customerid#"">#customeri d#"
MC = MC & ";properties/sale,,<A HREF=""detailp.asp?tbl=homes"& "&agentfirm=#properties/sale#"">#properties/sale#"
MC = MC & ";properties/rent,,<A HREF=""detailr.asp?tbl=rentals"& "&customerid=#properties/rent#"">#properties/rent#"
'county,,<A HREF=""detailp.asp?tbl=" & Session("savedtbl" & "&state=" & Session("savedstate" & "&county=#county#"">#county# MyDb.dbFormDisplayFlds = "1,2,3,4"
MyDb.dbMagicCell = MC
MyDb.dbFormMemo = "8,9"
MyDb.dbMemoTextSize = -1
MyDb.dbFormDisplayFlds = "0,1,2,3,4,5,6,7,10,11,12,13,14,15,16,17,18,19 ,20,21,22,23"
'MyDb.dbFormMemo="Description" 'Show the memo field below the Form
MyDb.dbNavigationItem = "top,prev,next,bottom,reload"
'MyDb.dbFilterFlds = "1,2,3,4"
'MyDb.dbFilterParams = "Help=False"
'MyDb.dbFilterDropFlds="3,,Employees,Title ,,,,,Distinct; 4,,Employees,TitleOfCourtesy,,,,,Distinct; City,,Employees,City,,,,,Distinct; Country,,Employees,Country,,,,,Distinct"
'MyDb.dbCSVName = "myFile.csv"
'Response.write("Version: " & Mydb.dbVersion & "<P>"
MyDb.ASPdbPro
Thanks for your help
Allan
Posting Permissions
- You may not post new threads
- You may not post replies
- You may not post attachments
- You may not edit your posts
-
Forum Rules
|
|