07-07-2008, 12:51
|
|
|
|
חבר מתאריך: 10.06.08
הודעות: 26
|
|
קודם כל תודה שענית.
וניסיתי כך:
קוד:
<%
Set Conn = Server.CreateObject("ADODB. RecordSet")
FilePath = Server.MapPath("BamBa/SqlDb.mdb")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & FilePath & ";"
SQL = "SELECT * FROM NewPage WHERE ID"
Set RS = Conn.Execute(SQL)
WHILE NOT RS.EOF
%>
<% If request.QueryString("WebName")=RS("USERTITLEx") AND Request.QueryString("PageName")=RS("SITENAMEx") Then%>
<HTML>
<BODY BGColor=<%=RS("USERBGx")%>>
<BODY BackGround=<%=RS("USERBGx")%>>
<title>
אתר-<%=RS("USERTITLEx")%>
</title>
<style type="text/css">
a:active
{
color: Black;
}
a:visited
{
color:Black;
}
a:hover {
text-decoration:none;
}
body {
scrollbar-face-color: gray;
scrollbar-shadow-color: white;
scrollbar-highlight-color: white;
scrollbar-3dlight-color: gray;
scrollbar-darkshadow-color: gray;
scrollbar-track-color: white;
scrollbar-arrow-color: white;
scrollbar-position:Right
}
</Style>
<center>
<Font Color="White" Face="arial" Size="5"><U><%=RS("USERMAINTITLE")%></U>
</center>
<BR>
<center>
<font color="black" face="TAHOMA" size="2"><U>חזור לדף הבית:</U></font>
</center>
<BR>
<table Width="40" Height="40" Border="1" BorderColor="gray" align="center">
<tr>
<th BackGround="white"><a href="WebSite.asp?name=<%=Request.Cookies("TITLEx")%>"><font color="green" size="2" face="TAHOME"><%=Request.Cookies("TITLEx")%>
</th>
</tr>
</table>
<BR>
<table border="1px" bordercolor="#CCCCCC" align="center" width="300" height="150" cellpadding="0" cellspacing="0" height="9">
<tr>
<th BGColor="#99ffee" aLign="right"><%=RS("USERTEXTx")%>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
<BR>
</th>
</tr>
</table>
<BR>
<BR>
<center>
<a href="Index.asp"><font color="#CCCCCC" face="TAHOMA" size="2">SiteMaker-דף הבית</a></font>
</center>
<table align="center">
<tr>
<th BackGround='imgSite/Right.gif'><font color="black" Size="2" face="Tahoma">Developer By:<font color="black" size="2" face="Tahoma"><a href="mailto:or_675@walla.co.il">orwb
</tr>
</table>
</body>
</html>
<% End if%>
<%
RS.MoveNext
WEND
%>
וזה נתן לי את השגיאה הבאה:
קוד:
Script error detected at line 3.
Source line: Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & FilePath & ";"
Description: דרוש אובייקט: 'Conn'
יש לך מושג למה?
|
ראשי
צ'אט
מצב כלאיים
