problems after creating link with table column and display row detail after clicked

241 100+

Expand|Select|Wrap|Line Numbers

 <%@ Language =vbscript%>

<% Option Explicit %>

<html>

<head><TITLE>VOICE OF BARAUNIANS</TITLE></head>

<body>

<!--#include file="front.inc"-->

<div style="Position:Absolute; width:700; TOP:0; left:180; background-color:#f0f0f0">

<%

Dim conn

dim objrs

Dim R

Dim R1

Dim vtopsub

dim vtopid

dim vempno

Dim countloop

Dim replycount

Set conn = Server.CreateObject("ADODB.Connection")

conn.Open("DSN=ORACLE; User Id = STARTER; Password = STARTER")

Set R = Server.CreateObject("ADODB.Recordset")

Set R1 = Server.CreateObject("ADODB.Recordset")

Set R = Conn.Execute("SELECT top_id, top_sub, launch_by, launch_dt FROM topmaster order by top_id  ")

%>

<div style="Position:Absolute; top:100; left:0; width:820; height:472; background-color:skyblue">

<table border=0>

  <tr>

    <td align='center' colspan='10%' bgcolor='#f0f0f0'><font face="arial" size=2><b>Top Id</b></font></td>

    <td align='center' colspan='40%' bgcolor='#f0f0f0'><font face="arial" size=2><b>Topic</b></font></td>

    <td align='center' colspan='40%' bgcolor='#f0f0f0'><font face="arial" size=2><b>Employee Name</b></font></td>

    <td align='center' colspan='20%' bgcolor='#f0f0f0'><font face="arial" size=2><b>Posted Date</b></font></td>

    <td align='center' colspan='10%' bgcolor='#f0f0f0'><font face="arial" size=2><b>No.Of Reply</b></font></td>

    <td align='center' colspan='10%' bgcolor='#f0f0f0'><font face="arial" size=2><b>Reply</b></font></td>

  </tr>

<%
 
  If Not R.EOF Then    

  R.Movefirst

  countloop = 1

  Do While Not R.EOF%>

    <tr>

      <td align='right' colspan='10%'><font face="arial" size=2><%Response.Write R("top_id")%></font></td>

      <td align='left' colspan='40%'><font face="arial" size=2><a href=voice.asp><%Response.Write R("top_sub")%></a></font></td>

      <td align='left' colspan='40%'><font face="arial" size=2><%Response.Write R("launch_by")%></font></td>

      <td align='center' colspan='20%'><font face="arial" size=2><%Response.Write R("launch_dt")%></font></td>

      <%Set R1 = Conn.Execute("SELECT top_id, rep_id from topic where top_id = " & R("top_id"))

      If R1.Recordcount >= 0 Then

        replycount = R1.Recordcount

      else

        replycount = 0

      end if %>

      <td align='center' colspan='10%'><font face="arial" size=2><%Response.Write replycount%></font></td>

     <td>   <input type="radio" name="vtopid" value="<%=R("top_id") %>"></td>

   </tr>

    <%countloop = countloop + 1

    If countloop <= 10 Then

      R.Movenext

    Else

      R.Movenext

    End If

  Loop %>

 <%

  If Not R.EOF Then

      Response.Cookies("top_id") = vtopid

end if

%>

</table>

<table width=765>

  <tr>

    <td align='right'><input type="submit" name="submit" value="Reply" onclick="reply()"></td>

      <td><input type ="button" value="EXIT" onClick="window.close()"></td>
 
  </tr>

</table>

<%end if%>

</div>

<%conn.close

Set conn = Nothing

%>

<script language="Javascript">

function brvoice()

{

  window.location = "brvoice.asp"

}
 
function reply()

{

  window.location = "voicereply.asp"

}

function voice()

{

  window.location = "voice.asp"

}

function newtopic()

{

  window.location = "newtopic.asp"

}

</script>

</body>

</html>
 
 asp code for display row detail after clicked but it only disply firs record please correct the code where is logic failed.

<% @ Language =vbscript%>

<% Option Explicit %>

<html>

<head><TITLE>VOICE OF BARAUNIANS</TITLE></head>

<body>

<!--#include file="front.inc"-->

<%If Request.Cookies("userid") = "" Then

  Response.Redirect "login.asp"

Else%>

<div style="Position:Absolute; width=700; TOP:100; left:180; background-color: #e0e0e0">

<%

Dim conn

Dim R

Dim R1

Dim i

Set conn = Server.CreateObject("ADODB.Connection")

conn.Open("DSN=ORACLE; User Id = STARTER; Password = STARTER")

Set R = Server.CreateObject("ADODB.Recordset")

Set R1 = Server.CreateObject("ADODB.Recordset")

Set R = Conn.Execute("SELECT a.top_id, a.top_sub, a.launch_by, a.launch_dt, a.msg,b.rep_id, b.rep_by, b.rep_dt,  b.reply FROM topmaster a,topic b ")

%>

<table border=2 width=700 >

  <tr>

    <td align='center' bgcolor='lightgrey'>Topic Id</td><td colspan='10%' align='right'><%Response.Write R("top_id")%></td>

  </tr>
 
     <tr>

   <td align='center' bgcolor='lightgrey'>Topic Subject</td><td colspan='10%' align='right'><%Response.Write  R("top_sub") %></td>

     </tr>

     <tr>

     <td align='center' bgcolor='lightgrey'>Employee Name</td><td colspan='40%' align='right'><%Response.Write R("launch_by") %></td>

     </tr>   

     <tr>

     <td align='center' bgcolor='lightgrey'>Posted Date</td><td colspan='40%' align='right'><%Response.Write R("launch_dt")%></td>

     </tr>

     <tr>

     <td align='center' bgcolor='lightgrey'>No.Of Reply</td>

     </tr>
 
      <table><b> VOICE</b>

      <tr><td colspan='10%' align='left'><%Response.Write R("msg")%></td></tr>

      </table>

<%
 
conn.close

Set conn = Nothing

%>

<script language="Javascript">

function brvoice()

{

  window.location = "brvoice.asp"

}
 
function voicereply()

{

  window.location = "voicereply.asp"

}

function voice()

{

  window.location = "reply.asp"

}

</script>

   <br>

   <table border=1; width = 700>

       <tr>

        <table align="center">

         <tr>

           <td align="center"><input type="button" name="post voice"  value="Vew Report" onclick= "voice()">

           <td align="center"><input type="button" name="post voice"  value="Reply" onclick= "voicereply()">

                             <td><input type="button" name="Back" value="Back" onclick="brvoice()"></td>

           </td>   

          </td>

         </tr>

        </table>

       </tr>

      </table>

<% End If %>

</body>

</html>

question :- i wnats to transfer value of one form to another form please give how to do.

Oct 19 '07 #1

Subscribe Post Reply

2192

idsanjeev

241

100+

dear sir
i wants to post any massages and stored in table.
display table data and create link with cloumn after clicking on column thats row detail only dislay

Oct 19 '07 #2

Similar topics

Problems with Xml, Javascript

by: arun32581 | last post by:

I am developing a page for Mozilla/IE which reads xml data and when the link on the page is clicked it displays the data as a table. The display is controlled by a Javascript. Everything works...

.NET Framework

Problems with XML & JavaScript

by: arun32581 | last post by:

I am developing a page for Mozilla/IE which reads xml data and when the link on the page is clicked it displays the data as a table. The display is controlled by a Javascript. Everything works...

Javascript

Search Problems

by: TH | last post by:

I am (still :) working on a recipe database. Now I am trying to figure out how to set it up for an ingredient search. What I want it to be able to do is to search by one ingredient, sometimes by...

Microsoft Access / VBA

How to create a link in ASP.Net's DataList?

by: Miguel Dias Moura | last post by:

Hello, I created a datalist in an ASP.Net / VB page. I display the image and price of a few products. When a user clicks an image I want to load the page "detail.aspx?number=id" and send the...

ASP.NET

Help please Creating web page of links and content

by: simon | last post by:

Hello, i'm looking to create an aspx page that is basically a FAQ page i'm not sure if this can be done, but would love some help with suggestions of how to do it another way if this is not...

Visual Basic .NET

Help creating dynamic links & label fill in aspx

by: simon | last post by:

Hello, i'm looking to create an aspx page that is basically a FAQ page i'm not sure if this can be done, but would love some help with suggestions of how to do it another way if this is not...

ASP.NET

How to trigger Javascript after link is followed?

by: zglazer | last post by:

Hi -- I'm working on a website that uses Javascript and CSS to show or hide portions of text on each page. There's a sort of table of contents at the top of each page, and rather than using anchor...

Javascript

link with column

by: idsanjeev | last post by:

sir i am requesting for how can create link with table field for displaying its entire row detail on next page. i.e create link with one column of table when clicked on any link column that display...

ASP / Active Server Pages

How to wrap up a link text when displayed in colum format

by: farhanm84 | last post by:

I have a requirement to display the link in colum format in IE browser. The link text is associated with an image (double arrow). Since the text of the link is large enough to set in one of the...

HTML / CSS

Hyperconverged All-in-One Streaming Engine, ushering in new age for distributed database

by: antdb | last post by:

Ⅰ. Advantage of AntDB: hyper-convergence + streaming processing engine In the overall architecture, a new "hyper-convergence" concept was proposed, which integrated multiple engines and...

General

How do I view Redshift db tables in Alteryx

by: Arjunsri | last post by:

I have a Redshift database that I need to use as an import data source. I have configured the DSN connection using the server, port, database, and credentials and received a successful connection...

General

by: WisdomUfot | last post by:

It's an interesting question you've got about how Gmail hides the HTTP referrer when a link in an email is clicked. While I don't have the specific technical details, Gmail likely implements measures...

General

PHP Curl Not wanting to connect to localhost.

by: Matthew3360 | last post by:

Hi, I have been trying to connect to a local host using php curl. But I am finding it hard to do this. I am doing the curl get request from my web server and have made sure to enable curl. I get a...

PHP

FPGA Question

by: Oralloy | last post by:

Hello Folks, I am trying to hook up a CPU which I designed using SystemC to I/O pins on an FPGA. My problem (spelled failure) is with the synthesis of my design into a bitstream, not the C++...

General

Join our open community on Discord to learn programming, SEO, and marketing

by: BLUEPANDA | last post by:

At BluePanda Dev, we're passionate about building high-quality software and sharing our knowledge with the community. That's why we've created a SaaS starter kit that's not only easy to use but also...

General

Mastering Python: A Versatile Programming Language for All

by: Rahul1995seven | last post by:

Introduction: In the realm of programming languages, Python has emerged as a powerhouse. With its simplicity, versatility, and robustness, Python has gained popularity among beginners and experts...

General

Datasheet Form, iterate through records

by: Johno34 | last post by:

I have this click event on my form. It speaks to a Datasheet Subform Private Sub Command260_Click() Dim r As DAO.Recordset Set r = Form_frmABCD.Form.RecordsetClone r.MoveFirst Do If...

Microsoft Access / VBA

hello, Is there code or static lib for hook swapchain present?

by: jack2019x | last post by:

hello, Is there code or static lib for hook swapchain present? I wanna hook dxgi swapchain present for dx11 and dx9.

C / C++