problems to use a redio button

241 100+

first i want to use link href to click and display its data on next page.
and anther work i want to do selected redio buttons top_id is submetted in another recordset. please help me soon

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>

  <%R.Movefirst

  countloop = 1

  Do While Not R.EOF%>

    <tr>

      <td align='right' colspan='10%'><font face="arial" size=2><a href=voice.asp><%Response.Write R("top_id")%></a></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="radio1" value="R("top_id")" checked></td>

   </tr>

    <%countloop = countloop + 1

    If countloop <= 10 Then

      R.Movenext

    Else

      R.Movelast

    End If

  Loop %>

 <%

  R.Find "top_id = '" & Request.Form("top_id") & "'"

  If Not R.EOF Then

     vtopid = Request.Form("top_id")

      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>

  </tr>

</table>
 
</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>

Expand|Select|Wrap|Line Numbers

 <%@ Language=VBScript%>

<%Option Explicit%>

<html>

<head>

<title>Barauni Refinery -Voice of baraunians</title>

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

</head>

<body>

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

  Response.Redirect "login.asp"

Else%>

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

<%

Dim R

Dim R1

dim R2

Dim vrepby

Dim vtopid

Dim vrepid

Dim vrepdt

Dim vreply

Dim errorMsg

Dim conn

dim i

Dim no_of_day

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 R2 = Server.CreateObject("ADODB.Recordset")

Set R2 = 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 ")

%>

   <center><b><font face="arial"><h2>POST YOUR REPLY</h2></font></b></center>

    <hr>

    <p>

    <form method="POST" action="voicereply.asp">

<div style="position:absolute; left:300; top:60; z-index:0">

<table border=1 width=250 > <font face="monotype corsiva"><b>Topic</b></center></font>

     <tr>

   <td align='center'>Topic ID</td><td colspan='10%' align='right'><%Response.Write  R2("top_id") %></td>

     </tr>

     <tr>

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

     </tr>

     <tr>

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

     </tr>   

     <tr>

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

     </tr>

     <tr>

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

     </tr>

<%end if%>

</table>

 </div>

<% R1.Open "Select top_id from topmaster order by top_id", conn, adOpenStatic, adLockOptimistic, adCmdText

  R.Open "Select rep_id from topic order by rep_id", conn, adOpenStatic, adLockOptimistic, adCmdText

  If R.Recordcount > 0 Then

    R.Movelast

    vrepid = R("rep_id")

    vrepid = CInt(vrepid) + 1

  Else

    vrepid = 1

  End if

Oct 17 '07 #1

Subscribe Post Reply

1604

jhardman

3,406

Expert 2GB

first i want to use link href to click and display its data on next page.
and anther work i want to do selected redio buttons top_id is submetted in another recordset. please help me soon

Please explain again what your question is. I'm afraid it is not clear what you are asking.

Jared

Oct 18 '07 #2

idsanjeev

241

100+

sir i am creating a page which is display records from table i wants to click on link and display its row detail after searching from table.
another work i wants to do reply on that topic and add its priamry key into anothe table automatically
that my problems
i cant disply specific row data it only disply first or last data from table clicking on any link .

Oct 19 '07 #3

jhardman

3,406

Expert 2GB

OK, from what I can see there are a couple holes. 1- the line that generates the radio button should look like this:

Expand|Select|Wrap|Line Numbers

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

the <%=%> notation is just a shortened notation for <%response.write%>. As you had it written the value passed to the form was "R("

2- On the second page you will need to pull up this info and pass it to the db somehow. Sind you are using a radio button and only one option will be selected, I would do something like this:

Expand|Select|Wrap|Line Numbers

 "SELECT * FROM topic WHERE top_id = '" & request.form("radio1") & "'"
 

I'm not sure I follow everything in your second page, so I hope I'm not steering you wrong, but it should be something along those lines.

Jared

Oct 19 '07 #4

idsanjeev

241

100+

thanks for taking response
plz support enhanced mode at next time

Oct 23 '07 #5

by: daveland | last post by:

I am working on some JavaScript that dynamically adds rows to a table in response to a button click. A new row does appear on the screen when the button is clicked. However, that table to which a...

Javascript

Problems emailing from a specific computer

by: John | last post by:

Hi All, I have a database with a button that when it is click it sends an email to the client. This email button works without any problems in other computers. On Thursday we bought a new...

Microsoft Access / VBA

recompiling VS NET WinForms app with VS NET 2003 causing serious problems.

by: BBFrost | last post by:

We just recently moved one of our major c# apps from VS Net 2002 to VS Net 2003. At first things were looking ok, now problems are starting to appear. So far ... (1) ...

C# / C Sharp

HTML Designer Problems

by: Lloyd Sheen | last post by:

This IDE is driving me nuts. I needed another button so I copied an existing one, changed the Text and the id and position by drag and drop. Well then I run and get the following: Control...

ASP.NET

Tkinter Dialog Management problems:

by: Michael Yanowitz | last post by:

Hello: Below I have included a stripped down version of the GUI I am working on. It contains 2 dialog boxes - one main and one settings. It has the following problems, probably all related, that...

Python

Problems with button control containing text and image

by: David | last post by:

Hello all. I am trying to implement my first server control and have run into two problems that I cannot solve. I need the assistance of someone with more experience. My goal was to create an...

ASP.NET

Record navigation and date problems

by: Wes Brooks | last post by:

Hello expert, Please help me with the following problems. I have spent ages to resolve them but no luck. I have two forms. (1) "Document Reception Input Form" is the main form. The search...

Microsoft Access / VBA

problems frame's display using java script

by: rajarya | last post by:

Hi, I m designing a HTML page(index.html),here i have 2 frames,by defult both frames have index1.html and index2.html as their source . in first frame(index.html) ,i have some redio buttons,and a...

Javascript

More Problems with IIS

by: Chris | last post by:

I was having problems using my local IIS to display asp.net pages, or any pages for that matter. I actually reinstalled IIS and then uninstalled the ..net framework and reinstalled it. All pages...

ASP.NET

Looking to do Android software development, any suggestions? Is flutter better?

by: nemocccc | last post by:

hello, everyone, I want to develop a software for my android phone for daily needs, any suggestions?

General

How to build RAID in BIOS?

by: Hystou | last post by:

There are some requirements for setting up RAID: 1. The motherboard and BIOS support RAID configuration. 2. The motherboard has 2 or more available SATA protocol SSD/HDD slots (including MSATA, M.2...

Computer Hardware

What is ONU?

by: marktang | last post by:

ONU (Optical Network Unit) is one of the key components for providing high-speed Internet services. Its primary function is to act as an endpoint device located at the user's premises. However,...

General

Problem With Comparison Operator <=> in G++

by: Oralloy | last post by:

Hello folks, I am unable to find appropriate documentation on the type promotion of bit-fields when using the generalised comparison operator "<=>". The problem is that using the GNU compilers,...

C / C++

Maximizing Business Potential: The Nexus of Website Design and Digital Marketing

by: jinu1996 | last post by:

In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...

Online Marketing

The easy way to turn off automatic updates for Windows 10/11

by: Hystou | last post by:

Overview: Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows...

Windows Server

Discussion: How does Zigbee compare with other wireless protocols in smart home applications?

by: tracyyun | last post by:

Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each...

General

Trying to create a lan-to-lan vpn between two differents networks

by: TSSRALBI | last post by:

Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The...

Networking - Hardware / Configuration

Windows Forms - .Net 8.0

by: adsilva | last post by:

A Windows Forms form does not have the event Unload, like VB6. What one acts like?

Visual Basic .NET

Similar topics