الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

ممكن تصحيح للمشاريع اللي انا عاملتهم

بدأه الزهرة البيضاء في 9 أبريل 2011 · 26 رد · 982 مشاهدة · في ASP.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم انا عاملة مشروعين واحد محرك بحث والتاني اعلان بس بدهم تزبيط او تشييك

محرك البحث يشتغل كامل بس انا بدي يعطيني الكود رابط تشعبي يعني صفحة وادخل عليها

اما الاعلان بدي اياه زي شريط الاخبار وبدي اسال كيف بقدر اضيف رمز اخر الشريط يعني بس يخلصو الاخبار كيف بدي اضيف رمز مثل الجزيرة

بس يا ريت سريعا

WebSite3.rar

WebSite2.rar

#2

السلام عليكم ورحمه الله وبركاته

طبعا عندي الحل بدون ما اشوف ايش سويتي ... اذا كان كل شيء شغال تمام ..

1. داخل الاداه التي تعرضي فيها النتيجه استخدمي

<a href='<%#Eval("Url")%>'><%#Eval("Title")%></a>

2. يمكنك استخدام ال <Marquee> ويمكنك اضافه <img> بداخله

تم تعديل هذه المشاركة بواسطة VB Helper في 9 أبريل 2011 في 21:40

.:: Wish to become better and better ::.

#3

بالنسبة للتاني مش راضي يشتغل بالمرة يعني بدو تعديل اذا ما في مانع

#4

عفوا بس الاول ما زبط عندي انا حطيتو داخل الجريد فيو وحطيت الربط مع ذلك ما اشتغل

#5

السلام عليكم ورحمه الله وبركاته

نفس الى قلته سابق ... هذا تعديل السؤال الاول


<asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False" DataSourceID="AccessDataSource1">
<Columns>
<asp:TemplateField>
<ItemTemplate>
<a href='<%#Eval("Code") %>'><%#Eval("Code") %></a>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>
لاتنسي ان تضيفي http في قاعده البيانات لجميع الروابط

      
تم تعديل هذه المشاركة بواسطة VB Helper في 9 أبريل 2011 في 22:43

      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#6
        
        

      
اوك وبالنسبة للتاني

      
      

      
    

  

    
    

      
#7
        
        

      
السلام عليكم ورحمه الله وبركاته
وهذا الثاني

<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<%@ Import Namespace="System.Data.OleDb" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">

<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Untitled Page</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
    <div style="text-align :left " >
        <table style="width: 440px">
            <tr>
                <td align="left" style="width: 770px"  valign ="top">
                <marquee id="nsmar" onmouseover="nsmar.stop();" onmouseout="nsmar.start();" direction="right">
                <%
                    Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data\الاعلانات.mdb"))
                    con.Open()
                    Dim cmd As New OleDbCommand("select * from اعلان", con)
                    Dim rdr As OleDbDataReader
                    rdr = cmd.ExecuteReader()
                    While rdr.Read()
                        Response.Write("<a href=" &rdr(0) & ">" & rdr(1) & "</a> ")
                    End While
                    %>
                </marquee>
                </td>

            </tr>
        </table>

    </div> 
    </div>
    </form>
</body>
</html>

      
      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#8
        
        

      
مش زابط لانو مكتبة الداتا مش موجودة داخل التش تي ام ال وجربت احطها ما زبطت ليش وكيف بدي احط صورة مثلا اخر الاعلان

      
      

      
    

  

    
    

      
#9
        
        

      
السلام عليكم ورحمه الله وبركاته
لو سمحت ركزي فوق
<%@ Import Namespace="System.Data.OleDb" %>

      
      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#10
        
        

      
ركزت ومو موجودة خلص مش مشكلة انا رح اضيفها بس وين موقعها بالزبط

وانا سالت سؤال تاني اللي هو كيف بدي احط صورة بعد كل خبر او اخر الاخبار كلها

اخي الكريم زبطت معي بس بعطيني ع الماركوي غلط مع اني نسختها زي ما كتبتها انت وما بعطيني خطأ غيرها ليش

      
      

      
    

  

    
    

      
#11
        
        

      
السلام عليكم ورحمه الله وبركاته
سأعيد كتابه الكود
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<%@ Import Namespace="System.Data.OleDb" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head runat="server">
    <title>Untitled Page</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
    <div style="text-align :left " >
        <table style="width: 440px">
            <tr>
                <td align="left" style="width: 770px"  valign ="top">
                <marquee id="nsmar" onmouseover="nsmar.stop();" onmouseout="nsmar.start();" direction="right">
                <%
                    Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data\الاعلانات.mdb"))
                    con.Open()
                    Dim cmd As New OleDbCommand("select * from اعلان", con)
                    Dim rdr As OleDbDataReader
                    rdr = cmd.ExecuteReader()
                    While rdr.Read()
                        Response.Write("<a href=" &rdr(0) & ">" & rdr(1) & "</a> ")
                    End While
                    %>
                </marquee>
                </td>
            </tr>
        </table>
    </div> 
    </div>
    </form>
</body>
</html>
اما بالنسبه للصوره فيمكنك كتابه <img> قبل طباعه الاعلان

      
تم تعديل هذه المشاركة بواسطة VB Helper في 9 أبريل 2011 في 23:41

      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#12
        
        

      
اخي الكريم اول اشي بتشكرك واسفة لاني غلبتك تاني اشي ليش الماركوي بعطيني فيها غلط مع اني بكتبها نفس الاشي بس بضلو يعطيني عليها غلط شو السبب

      
      

      
    

  

    
    

      
#13
        
        

      
السلام عليكم ورحمه الله وبركاته
غلط؟؟؟؟ يمكن خط اخضر تحتها معناته انه مش معرفة لانها اهملت في الاصدارات الاخير لل html ويمكنك عملها ب css

      
      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#14
        
        

      
لا خط احمر

      
      

      
    

  

    
    

      
#15
        
        

      
السلام عليكم ورحمه الله وبركاته
لو سمحت اكتبي الكود او ارسليه

      
      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#16
        
        

      
السلام عليكم
<%@ Page Language="VB" AutoEventWireup="false" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<%@ Import Namespace="System.Data.OleDb" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head id="Head1" runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<div style="text-align :left " >
<table style="width: 440px">
<tr>
<td align="left" style="width: 770px" valign ="top">
<marquee id="nsmar" onmouseover="nsmar.stop();" onmouseout="nsmar.start();" direction="right">
<%
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("App_Data\الاعلانات.mdb"))
con.Open()
Dim cmd As New OleDbCommand("select * from اعلان", con)
Dim rdr As OleDbDataReader
rdr = cmd.ExecuteReader()
While rdr.Read()
Response.Write("<a href=" &rdr(0) & ">"  & "(<IMG SRC="~\App_Data/logo.gif" /> "& rdr(1) & "(<IMG SRC="~\App_Data/logo.gif" /> "& "</a> ")
End While
%>
</marquee>
</td>
</tr>
</table>
</div>
</div>
</form>
</body>
</html>

      
      

      
    

  

    
    

      
#17
        
        

      
السلام عليكم ورحمه الله وبركاته
المشكله ليس بوسم ال Marquee وانما في اضافه الصوره .. يرجى التعديل الى
Response.Write("<img src='.\App_Data\logo.gif'> <a href=" &rdr(0) & ">" & rdr(1) & "</a> ")

      
      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#18
        
        

      
اخي الكريم بعطيني نفس الاشي خطأ بالماركويي

      
      

      
    

  

    
    

      
#19
        
        

      
السلام عليكم ورحمه الله وبركاته
لو سمحت ارسلي مشروعك كملف مضغوط وسوف اقوم بتعديله

      
      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#20
        
        

      
يسلمو اخي انا كتير تعبتك معي
WebSite3.rar

      
      

      
    

  

    
    

      
#21
        
        

      
السلام عليكم ورحمه الله وبركاته
جربي هذا  WebSite3.zip

      
      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#22
        
        

      
يسلمو  اخي شكرا كتير الك

      
      

      
    

  

    
    

      
#23
        
        

      
السلام عليكم ورحمه الله وبركاته
المهم انه ضبط .. ولا شكر على واجب

      
      

      
.:: Wish to become better and better ::.

    

  

    
    

      
#24
        
        

      
اخي الكريم بس ممكن اسال كيف بدي مثلا اضيف عليه يعني ما يضلو بس اللي موجودين بقاعدة البيانات انو اقدر ازيدهم كمان

      
      

      
    

  

    
    

      
#25
        
        

      
السلام عليكم ورحمه الله وبركاته
كيف تزيدي عليهم ... اصلا مصدر الاعلان من قاعده البيانات!! ممكن توضحي اكثر

      
      

      
.:: Wish to become better and better ::.

    

  

    
    
    
 مواضيع مشابهة