Question

asp form tab using number pad option

Asked by: jeremyBass26

Hello I need to add script in the asp form I have that allows the user to use the 1 2 3 4 5 and ent to quicky move thou the form.. Im sure there is an easy way to do it in a form that is nothing but radio groups, it's just that I'm still green and not sure on how to iderate thru the form with a short simple script for this function.. Thank you for the help...

Jeremy

the code below is for the .vb to the form.. I also included the working form and the .vb files too..

Imports System
Imports System.Data
Imports System.Configuration
Imports System.Collections
Imports System.Web
Imports System.Web.Security
Imports System.Web.UI
Imports System.Web.UI.WebControls
Imports System.Web.UI.WebControls.WebParts
Imports System.Web.UI.HtmlControls
Imports System.Net.Mail
Imports System.Linq
Imports System.Linq.Queryable
 
Public Class MailHelper
   ''' <summary>
   ''' Sends an mail message
   ''' </summary>
   ''' <param name="from">Sender address</param>
   ''' <param name="recepient">Recepient address</param>
   ''' <param name="bcc">Bcc recepient</param>
   ''' <param name="cc">Cc recepient</param>
   ''' <param name="subject">Subject of mail message</param>
   ''' <param name="body">Body of mail message</param>
   Public Shared Sub SendMailMessage(ByVal from As String, ByVal recepient As String, ByVal bcc As String, ByVal cc As String, ByVal subject As String, ByVal body As String)
      ' Instantiate a new instance of MailMessage
      Dim mMailMessage As New MailMessage()
 
      ' Set the sender address of the mail message
      mMailMessage.From = New MailAddress(from)
      ' Set the recepient address of the mail message
      mMailMessage.To.Add(New MailAddress(recepient))
 
      ' Check if the bcc value is nothing or an empty string
      If Not bcc Is Nothing And bcc <> String.Empty Then
         ' Set the Bcc address of the mail message
         mMailMessage.Bcc.Add(New MailAddress(bcc))
      End If
 
      ' Check if the cc value is nothing or an empty value
      If Not cc Is Nothing And cc <> String.Empty Then
         ' Set the CC address of the mail message
         mMailMessage.CC.Add(New MailAddress(cc))
      End If
 
      ' Set the subject of the mail message
      mMailMessage.Subject = subject
      ' Set the body of the mail message
      mMailMessage.Body = body
 
      ' Set the format of the mail message body as HTML
      mMailMessage.IsBodyHtml = True
      ' Set the priority of the mail message to normal
      mMailMessage.Priority = MailPriority.Normal
 
      ' Instantiate a new instance of SmtpClient
      Dim mSmtpClient As New SmtpClient()
      ' Send the mail message
      mSmtpClient.Send(mMailMessage)
   End Sub
End Class
 
 
 
Partial Class PanelVB
    Inherits System.Web.UI.Page
 
    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
'dim mycountries=New SortedList 
'mycountries.Add("6000","NURSING")
'mycountries.Add("0000","Select a department")
'mycountries.Add("6010","PATIENT")
'mycountries.Add("6011","PATIENT EDUC")
'mycountries.Add("6012","PATIENT EDUC")
'mycountries.Add("6080","RECRUIT/RETENTN")
'mycountries.Add("6090","FLOAT POOL")
'mycountries.Add("6100","MEDICAL")
'mycountries.Add("6150","ORTHO/NEURO")
'mycountries.Add("6200","SURGICAL")
'mycountries.Add("6205","MED/SURG NRSG ADMIN")
'mycountries.Add("6250","PROGRESSIVE CARE UNIT")
'mycountries.Add("6300","PEDIATRICS")
'mycountries.Add("6350","2A TRANSITIONAL CARE")
'mycountries.Add("6400","CRITICAL CARE UNIT")
'mycountries.Add("6460","OBSTETRICS")
'mycountries.Add("6500","NURSERY")
'mycountries.Add("6550","PERINATAL COORDINATOR")
'mycountries.Add("6600","OPERATING ROOM")
'mycountries.Add("6601","PRE-SURGERY CENTER")
'mycountries.Add("6605","SURG & OP SERV ADMIN")
'mycountries.Add("6650","RECOVERY ROOM")
'mycountries.Add("6670","OUTPATIENT SURGERY")
'mycountries.Add("6700","LABOR & DELIVERY")
'mycountries.Add("6740","OR SUPPORT")
'mycountries.Add("6750","CENTRAL SERVICES")
'mycountries.Add("6770","IV SOLUTIONS")
'mycountries.Add("6780","EMERGENCY")
'mycountries.Add("6781","MINOR CARE")
'mycountries.Add("6784","ER REGISTRATION")
'mycountries.Add("6785","PRE HOSPITAL SUPPORT")
'mycountries.Add("6850","SPECIAL PROCEDURES UNIT")
'mycountries.Add("6851","CHEMOTHERAPY")
'mycountries.Add("6880","CANCER CENTER ADMIN")
'mycountries.Add("6900","MENTAL HEALTH CENTER")
'mycountries.Add("6905","MENTAL HEALTH CLINIC")
'mycountries.Add("6950","MENTAL HEALTH ADMIN")
'mycountries.Add("7120","EKG")
'mycountries.Add("7140","EEG")
'mycountries.Add("7150","RADIOLOGY ADMINISTRATION")
'mycountries.Add("7210","DIAGNOSTIC RADIOLOGY")
'mycountries.Add("7220","NUCLEAR MEDICINE")
'mycountries.Add("7230","ULTRASOUND")
'mycountries.Add("7231","ECHOCARDIOGRAM")
'mycountries.Add("7240","CT SCAN")
'mycountries.Add("7250","MRI")
'mycountries.Add("7260","RADIATION ONCOLOGY")
'mycountries.Add("7270","CARDIAC VASC CATHLAB")
'mycountries.Add("7280","LMC Radiology")
'mycountries.Add("7300","PHARMACY")
'mycountries.Add("7301","EMPLOYEE PRESCRIPTNS")
'mycountries.Add("7302","PHARMACY -CANCER")
'mycountries.Add("7340","PAIN MANAGEMENT CTR")
'mycountries.Add("7350","ANESTHESIOLOGY")
'mycountries.Add("7360","PULMONARY")
'mycountries.Add("7361","HOME RESPIRATORY PGM")
'mycountries.Add("7363","NIP NICOTINE PREVENT")
'mycountries.Add("7365","CARDIOPULMONARY")
'mycountries.Add("7370","I/P PHYSICAL THERAPY")
'mycountries.Add("7371","O/P PHYSICAL THERAPY")
'mycountries.Add("7375","REHAB ADMINISTRATION")
'mycountries.Add("7380","OCCUPATIONAL THERAPY")
'mycountries.Add("7390","SPEECH THERAPY")
'mycountries.Add("7410","PASTORAL CARE")
'mycountries.Add("7420","SOCIAL SERVICES")
'mycountries.Add("7430","HOSPICE")
'mycountries.Add("7680","HEALTH INFO SRVCS")
'mycountries.Add("7685","TRANSCRIPTION")
'mycountries.Add("7850","INFECTION CONTROL")
'mycountries.Add("8010","DIETARY")
'mycountries.Add("8011","NUTRITIONAL COUNSEL")
'mycountries.Add("8013","O/P NUTRITION COUNS")
'mycountries.Add("8015","CAFETERIA")
'mycountries.Add("8300","PLANT MAINTENANCE")
'mycountries.Add("8310","LMC PLANT MAINT")
'mycountries.Add("8340","BIO-MEDICAL")
'mycountries.Add("8341","TRIMEDX")
'mycountries.Add("8350","SECURITY")
'mycountries.Add("8360","SAFETY COORDINATOR")
'mycountries.Add("8500","ENVIRONMENTAL SERVICES")
'mycountries.Add("8600","LINEN SERVICES")
'mycountries.Add("9010","ACCOUNTING")
'mycountries.Add("9020","BUSINESS OFFICE")
'mycountries.Add("9040","ADMITTING")
'mycountries.Add("9060","SWITCHBOARD")
'mycountries.Add("9100","MGT INFO SYSTEMS")
'mycountries.Add("9101","AHIS")
'mycountries.Add("9160","COMMUNICATIONS")
'mycountries.Add("9400","FOUNDATION")
'mycountries.Add("9410","DIABETIC PROGRAM")
'mycountries.Add("9440","MEDICAL LIBRARY")
'mycountries.Add("9450","RISK MANAGEMENT")
'mycountries.Add("9460","QUALITY ASSURANCE")
'mycountries.Add("9490","CORP RESPONSIBILITY")
'mycountries.Add("9500","ADMINISTRATION")
'mycountries.Add("9501","LC HEALTH ALLIANCE")
'mycountries.Add("9502","COMMUNITY SERVICE")
'mycountries.Add("9503","EMERGENCY PREPARED")
'mycountries.Add("9506","COMMUNITY EDUCATION")
'mycountries.Add("9510","PERSONNEL")
'mycountries.Add("9520","VOLUNTEER SERVICES")
'mycountries.Add("9521","AUXILIARY /GIFT SHOP")
'mycountries.Add("9522","FOUNDATION")
'mycountries.Add("9530","COMMUNITY RELATIONS")
'mycountries.Add("9540","EDUCATION")
'mycountries.Add("9550","MATERIALS MANAGEMENT")
'mycountries.Add("9560","PRINT SHOP")
'mycountries.Add("9570","CARONDELET HOUSE")
'mycountries.Add("9580","MEDICAL STAFF SUPPORT")
'
'  rb.DataSource=mycountries
'  rb.DataValueField="Key"
'  rb.DataTextField="Value"
' If rb.SelectedValue = "" Then
'     rb.DataBind()
'End If	 
 
 
	 If Not Page.IsPostBack Then
			
			Start.Enabled = False
			NextSteps.Enabled = False
			Finish.Enabled = False
			PrevSteps.Visible = False
			NextSteps.Visible = False
			Finish.Visible = False
            ViewState("PanelSeed") = 0
            Panel0.Visible = True
			Panel1.Visible = False
            Panel2.Visible = False
			Panel3.Visible = False
			Panel4.Visible = False
			Panel5.Visible = False
			Panel6.Visible = False
			Panel7.Visible = False
			Panel8.Visible = False
			Panel9.Visible = False
			Panel10.Visible = False
			Panel11.Visible = False
			Panel12.Visible = False
			Panel13.Visible = False
			Panel14.Visible = False
			Panel15.Visible = False
			Panel16.Visible = False
			Panel17.Visible = False
			Panel18.Visible = False
			Panel19.Visible = False
			Panel20.Visible = False
			Panel21.Visible = False
			Panel22.Visible = False
			Panel23.Visible = False
			Panel24.Visible = False
			Panel25.Visible = False
			Panel26.Visible = False
			Panel27.Visible = False
			Panel28.Visible = False
			Panel29.Visible = False
			Panel30.Visible = False
			Panel31.Visible = False
			Panel32.Visible = False
			Panel33.Visible = False
			Panel34.Visible = False
			Panel35.Visible = False
			Panel36.Visible = False
			Panel37.Visible = False
			Panel38.Visible = False
			Panel39.Visible = False
			Panel40.Visible = False
			Panel41.Visible = False
			Panel42.Visible = False
			Panel43.Visible = False
			Panel44.Visible = False
			Panel45.Visible = False
			Panel46.Visible = False
			Panel47.Visible = False
			Panel48.Visible = False
			Panel49.Visible = False
			Panel50.Visible = False
			Panel51.Visible = False
			Panel52.Visible = False
			Panel53.Visible = False
			Panel54.Visible = False
			Panel55.Visible = False
			Panel56.Visible = False
			Panel57.Visible = False
			Panel58.Visible = False
			Panel59.Visible = False
			Panel60.Visible = False
			Panel61.Visible = False
			Panel62.Visible = False
			Panel63.Visible = False
			Panel64.Visible = False
			Panel65.Visible = False
			Panel66.Visible = False
			Panel67.Visible = False
			Panel68.Visible = False
			Panel69.Visible = False
			Panel70.Visible = False
			Panel71.Visible = False
			Panel72.Visible = False
			Panel73.Visible = False
			Panel74.Visible = False
			Panel75.Visible = False
			Panel76.Visible = False
			Panel77.Visible = False
			Panel78.Visible = False
			Panel79.Visible = False
			Panel80.Visible = False
			Panel81.Visible = False
			Panel82.Visible = False
			Panel83.Visible = False
			Panel84.Visible = False
			Panel85.Visible = False
			Panel86.Visible = False
			Panel87.Visible = False
			Panel88.Visible = False
			Panel89.Visible = False
			Panel90.Visible = False
			Panel91.Visible = False
			Panel92.Visible = False
			Panel93.Visible = False
			Panel94.Visible = False
			Panel95.Visible = False
			Panel96.Visible = False
			Panel97.Visible = False
			Panel98.Visible = False
			Panel99.Visible = False
			Panel100.Visible = False
			Panel101.Visible = False
			Panel102.Visible = False
			Panel103.Visible = False
			Panel104.Visible = False
			Panel105.Visible = False
			Panel106.Visible = False
			Panel107.Visible = False
			Panel108.Visible = False
			Panel109.Visible = False
			Panel110.Visible = False
			Panel111.Visible = False
			Panel112.Visible = False
			Panel113.Visible = False
			Panel114.Visible = False
			Panel115.Visible = False
			Panel116.Visible = False
			Panel117.Visible = False
			Panel118.Visible = False
			Panel119.Visible = False
			Panel120.Visible = False
			Panel121.Visible = False
			Panel122.Visible = False
			Panel123.Visible = False
			Panel124.Visible = False
        End If
    End Sub
 
    Protected sub displayMessage(s as Object,e As EventArgs)
	'lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
		Start.Enabled = True
	end sub
	
	Protected sub showNext(s as Object,e As EventArgs)
	'lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
		NextSteps.Enabled = True
	end sub
	
 
    Protected Sub PrevStep(ByVal sender As [Object], ByVal e As EventArgs)
	Dim ctlname As String
Dim ctltextbox As Control
        Dim CurrentPanel As String = "Panel" + ViewState("PanelSeed").ToString()
        ViewState("PanelSeed") = CInt(ViewState("PanelSeed")) - 1
        Dim PrevPanel As String = "Panel" + ViewState("PanelSeed").ToString()
        Dim p As Panel = CType(FindControl(CurrentPanel), Panel)
        p.Visible = False
        p = CType(FindControl(PrevPanel), Panel)
        p.Visible = True
		If CInt(ViewState("PanelSeed")) = 0 Then
'            FUserName.Text = UserName.Text
'            FAddress.Text = Address.Text
'            FZipCode.Text = ZipCode.Text
'            FComment.Text = Comment.Text
		Start.Visible = True
		PrevSteps.Visible = False
		NextSteps.Visible = False
		Finish.Visible = False
        End If
		If CInt(ViewState("PanelSeed")) = 0 Then
'            FUserName.Text = UserName.Text
'            FAddress.Text = Address.Text
'            FZipCode.Text = ZipCode.Text
'            FComment.Text = Comment.Text
		Start.Visible = True
		PrevSteps.Visible = False
		NextSteps.Visible = False
		Finish.Visible = False
        End If
		
ctlname = "RBL" & CInt(ViewState("PanelSeed"))
ctltextbox = FindControl(ctlname)
 
If ctltextbox IsNot Nothing Then
 
If Not CType(ctltextbox, RadioButtonList).Text = "" Then
     NextSteps.Enabled = True
	 End If	
End If	
 
		
    End Sub
    Protected Sub NextStep(ByVal sender As Object, ByVal e As EventArgs)
		Dim ctlname As String
		Dim ctltextbox As Control
        Dim CurrentPanel As String = "Panel" + ViewState("PanelSeed").ToString()
        ViewState("PanelSeed") = CInt(ViewState("PanelSeed")) + 1
        Dim NextPanel As String = "Panel" + ViewState("PanelSeed").ToString()
        Dim p As Panel = CType(FindControl(CurrentPanel), Panel)
        p.Visible = False
        p = CType(FindControl(NextPanel), Panel)
        p.Visible = True
 
		
        If Not CInt(ViewState("PanelSeed")) = 0 Then
'            FUserName.Text = UserName.Text
'            FAddress.Text = Address.Text
'            FZipCode.Text = ZipCode.Text
'            FComment.Text = Comment.Text
		Start.Visible = False
		PrevSteps.Visible = True
		NextSteps.Visible = True
		NextSteps.Enabled = False
		Finish.Visible = False
        End If
		
		If CInt(ViewState("PanelSeed"))  = 124 Then
'            FUserName.Text = UserName.Text
'            FAddress.Text = Address.Text
'            FZipCode.Text = ZipCode.Text
'            FComment.Text = Comment.Text
		Start.Visible = False
		PrevSteps.Visible = True
		NextSteps.Visible = False
		Finish.Visible = True
		Finish.Enabled = True
        End If
		
		
		ctlname = "RBL" & CInt(ViewState("PanelSeed"))
ctltextbox = FindControl(ctlname)
 
If ctltextbox IsNot Nothing Then
 
If Not CType(ctltextbox, RadioButtonList).Text = "" Then
     NextSteps.Enabled = True
	 End If	
End If	
		
    End Sub
	
	Protected Sub btnSendFeedback_Click(ByVal sender As Object, ByVal e As System.EventArgs)
	Dim bcc, cc, comment1, comment, name, phone, subject, msgbody As String
 
 
Dim x As Integer 
Dim ctlname As String
Dim ctltextbox As Control
Dim HtmlNewLine as string ="<br />"
 
msgbody += "A new test has been sent by " & txtName.Text & HtmlNewLine & vbCrLf & vbCrLf & _
"In the" & rb.SelectedItem.Text & " department  (" & rb.SelectedItem.Value & ")" & HtmlNewLine & vbCrLf & vbCrLf
 
 
 
For x = 1 To 123
ctlname = "RBL" & x
ctltextbox = FindControl(ctlname)
 
If ctltextbox IsNot Nothing Then
     msgbody += x & ".) " & CType(ctltextbox, RadioButtonList).Text & HtmlNewLine & vbCrLf & vbCrLf
End If	
Next
 
 
 
	'kpowell@dada.org
name = ""
phone = ""
comment = ""
bcc = ""
cc = ""
subject = "Test results were sent from the Test Form"
MailHelper.SendMailMessage("NOREPLY.Manditory@dada.org", "jeremy@adad.tv", bcc, cc, subject, msgbody)
lbl1.text="Your test has been sent "
		PrevSteps.Enabled = False
		Finish.Enabled = False
End Sub
End Class

                                  
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:
44:
45:
46:
47:
48:
49:
50:
51:
52:
53:
54:
55:
56:
57:
58:
59:
60:
61:
62:
63:
64:
65:
66:
67:
68:
69:
70:
71:
72:
73:
74:
75:
76:
77:
78:
79:
80:
81:
82:
83:
84:
85:
86:
87:
88:
89:
90:
91:
92:
93:
94:
95:
96:
97:
98:
99:
100:
101:
102:
103:
104:
105:
106:
107:
108:
109:
110:
111:
112:
113:
114:
115:
116:
117:
118:
119:
120:
121:
122:
123:
124:
125:
126:
127:
128:
129:
130:
131:
132:
133:
134:
135:
136:
137:
138:
139:
140:
141:
142:
143:
144:
145:
146:
147:
148:
149:
150:
151:
152:
153:
154:
155:
156:
157:
158:
159:
160:
161:
162:
163:
164:
165:
166:
167:
168:
169:
170:
171:
172:
173:
174:
175:
176:
177:
178:
179:
180:
181:
182:
183:
184:
185:
186:
187:
188:
189:
190:
191:
192:
193:
194:
195:
196:
197:
198:
199:
200:
201:
202:
203:
204:
205:
206:
207:
208:
209:
210:
211:
212:
213:
214:
215:
216:
217:
218:
219:
220:
221:
222:
223:
224:
225:
226:
227:
228:
229:
230:
231:
232:
233:
234:
235:
236:
237:
238:
239:
240:
241:
242:
243:
244:
245:
246:
247:
248:
249:
250:
251:
252:
253:
254:
255:
256:
257:
258:
259:
260:
261:
262:
263:
264:
265:
266:
267:
268:
269:
270:
271:
272:
273:
274:
275:
276:
277:
278:
279:
280:
281:
282:
283:
284:
285:
286:
287:
288:
289:
290:
291:
292:
293:
294:
295:
296:
297:
298:
299:
300:
301:
302:
303:
304:
305:
306:
307:
308:
309:
310:
311:
312:
313:
314:
315:
316:
317:
318:
319:
320:
321:
322:
323:
324:
325:
326:
327:
328:
329:
330:
331:
332:
333:
334:
335:
336:
337:
338:
339:
340:
341:
342:
343:
344:
345:
346:
347:
348:
349:
350:
351:
352:
353:
354:
355:
356:
357:
358:
359:
360:
361:
362:
363:
364:
365:
366:
367:
368:
369:
370:
371:
372:
373:
374:
375:
376:
377:
378:
379:
380:
381:
382:
383:
384:
385:
386:
387:
388:
389:
390:
391:
392:
393:
394:
395:
396:
397:
398:
399:
400:
401:
402:
403:
404:
405:
406:
407:
408:
409:
410:
411:
412:
413:
414:
415:
416:
417:
418:
419:
420:
421:
422:
423:
424:
425:
426:
427:
428:
429:
430:
431:
432:
433:
434:
435:
436:
437:
438:
439:
440:
441:
442:
443:
444:
445:
446:
447:
448:
449:
450:
451:
452:
453:
454:
455:
456:
457:
458:
459:
460:
461:
462:
463:
464:
465:

Select allOpen in new window

This Question has been solved and asker verified All Experts Exchange premium technology solutions are available to subscription members.

Subscribe now for full access to Experts Exchange and get

Instant Access to this Solution

  • Plus...
  • 30 Day FREE access, no risk, no obligation
  • Collaborate with the world's top tech experts
  • Unlimited access to our exclusive solution database
  • Never be left without tech help again

Subscribe Now

Asked On
2009-11-04 at 09:29:58ID24871656
Tags

asp.net

,

VB

Topics

Programming for ASP.NET

,

.NET Framework 2.x

,

Microsoft Visual Basic.Net

Participating Experts
1
Points
500
Comments
8

Trusted by hundreds of thousands everyday for fast, accurate and reliable tech support.

  • "The time we save is the biggest benefit of Experts Exchange to Warner Bros. What could take multiple guys 2 hours or more each to find is accessed in around 15 minutes on Experts Exchange." Mike Kapnisakis, Warner Bros.
  • "Our team likes having a resource that is more secure than just using Google and most experts using this service really know their stuff. It's nice to look here first versus using Google." Dayna Sellner, Lockheed Martin
  • "Anytime that I've been stumped with a problem, 9 out of 10 times Experts Exchange has either the accepted solution or an open discussion of the potential solution to the problem." Kenny Red, eBay Inc.

See what Experts Exchange can do for you.

Got a question?

We've got the answer.

Experts Exchange has been collecting answers to technology questions since 1996…3 million and counting! If you have a question, chances are we already have your answer.

Screenshot of Experts Exchange Knowledgebase

Need individual assistance?

Our experts are ready to help.

If you can't find the exact answer you're looking for, ask our exclusive community of 50,000 experts. You’ll get a personalized answer from a trusted professional.

Screenshot of Experts Exchange Knowledgebase

Want to learn from the best?

Read articles from industry experts.

Thousands of free tech tips, tricks, how-to’s and tutorials are available in our peer reviewed articles section. See for yourself how smart our experts are, no login required.

Screenshot of an Article

Working on a long term project?

Store your work and research.

Save solutions to your questions, answers you’ve discovered through searching plus helpful articles in your personal knowledgebase for easy future access.

Screenshot of Experts Exchange Knowledgebase

Access the answers to your technology questions today.

Subscribe Now

30-day free trial. Register in 60 seconds.

What Makes Experts Exchange Unique?

Members of the expert community talk about why the experience at Experts Exchange is different than what you will find anywhere else.

Trusted by the world's most respected brands.

image of each brand's logo

Faithfully serving IT professionals since 1996.

Experts Exchange Logo

Try it out and discover for yourself.

Subscribe Now

30-day free trial. Register in 60 seconds.

Related Solutions

  1. Radio Buttons in ASP
    I am new to ASP and I am building an ASP page where a user has about 10 questions. They choose the answer from 5 radio buttons. I then want to record the response in a table on a SQL server. I have the connection to the database set up correctly but I am not sure how to recor...
  2. For Jeremy_D
    Thanks Jeremy for your help. Dawson
  3. Quickie regarding correct syntax...
    Just a quickie. In the following response.write - how would I insert <%=rsProduct("FittingGuide") %> after /fittingguide/ response.write("<a href=/documents/fittingguide/<ASP INSERTION TO GO HERE> target=_blank><img src =/images/fittinggu...
  4. Radio in ASP
    Hi I have a shoutcast radio server running.When the user click on the link.It open in winamp player.Is there any code that can make the radio run behind a ASP page... Regards Hari
  5. Radio buttton validation HELP
    I have a grid that has YES and NO HTML radio buttons for each row. I need to make sure the user selects at least one. Each row has a unique radion button like: Row 1 rcount = 1 <input type="radio" name="Radio(rcount)" value="Yes /> <i...

Free Tech Articles

  1. WARNING: 5 Reasons why you should NEVER fix a computer for free.
    It is in our nature to love the puzzle. We are obsessed. The lot of us. We love puzzles. We love the challenge. We thrive on finding the answer. We hate disarray. It bothers us deep in our soul. W...
  2. SCCM OSD Basic troubleshooting
    SCCM 2007 OSD is a fantastic way to deploy operating systems, however, like most things SCCM issues can sometimes be difficult to resolve due to the sheer volume of logs to sift through and the dispe...
  3. Migrate Small Business Server 2003 to Exchange 2010 and Windows 2008 R2
    This guide is intended to provide step by step instructions on how to migrate from Small Business Server 2003 to Windows 2008 R2 with Exchange 2010. For this migration to work you will need the fo...
  4. Create a Win7 Gadget
    This article shows you how to create a simple "Gadget" -- a sort of mini-application supported by Windows 7 and Vista. Gadgets can be dropped anywhere on the desktop to provide instant information, ...
  5. Outlook continually prompting for username and password
    There have been a lot of questions recently regarding Outlook prompting for a username and password whilst using Exchange 2007. There are a few reasons why this would happen and I will try to cover t...
  6. Backup Exchange 2010 Information Store using Windows Backup
    There seems to be quite a lot of confusion around the ability to backup Exchange 2010 using the built in Windows Backup feature. This stems from the omission of this feature prior to Exchange 2007 s...

Cloud Class Webinars

  1. Avoiding Bugs in Microsoft Access
    Alison Balter takes and in-depth look at avoiding bugs in Access. In this webinar you will learn about using the immediate window to debug your applications, invoking the debugger, using breakpoints to troubleshoot, stepping through code, setting the next statement to execute, ...
  2. Top 10 Best New Features in Visio 2010
    Scott Helmers gives live demonstrations of the top 10 new features in Visio 2010. This webinar will teach you how to create compelling diagrams by adding shapes to the page with a single click, linking the shapes in a diagram to data in Excel (or SQL Server, or SharePoint), ...
  3. IT Consultant Business Secrets Revealed
    Michael Munger, Experts Exchange tech pro and IT consultant, pulls back the curtain on his very successful businesses and answers question on every IT consultant and business owner should know about. He shares secrets on what he did to solve the 5 most common problems in IT, ...
  4. Disaster Recovery and Business Continuity
    Quest CTO, Mike Billon, gives an overview of the steps involved in building a dunamic disaster recovery plan. Through case studies and an examination of software/hardware tooles for monitoring and testing, you'll gain a better understandin of where you are, where you want ...
  5. Organize Your Visio Diagrams with Containers and Lists
    Scott Helmers uses cross functional flowcharts, wireframe diagrams, data graphic legends and seating charts to teach you: how to ustilize all three new structured diagram components in Visio 2010, the best practices for organizeing shapes in previous version of Visio, how to organize ...
  6. How to Us Objects, Properties, Events and Methods in Microsoft Access
    Alison Dalter gives an in-depbth look at objects, properties, events and methods in Microsoft Access. In this webinar you will learn about using the object browser, referring to objects, working with properties and methods, working with object variables, understanding the ...

Join the Community

Give a Little. Get a Lot.

Join the community of experts here and help other tech pros by answering question in your area of expertise. You can earn FREE access to all Experts Exchange's premium features and resources.

Join the Community

Answers

 

by: TheLearnedOnePosted on 2009-11-05 at 06:22:41ID: 25749712

It sounds like what you need are named anchor elements placed throughout the page, that you can use in a post-back URL to jump to that anchor on the web page.

 

by: jeremyBass26Posted on 2009-11-05 at 06:53:14ID: 25750040

ga what... your saying that I can use 1 2 3 4 5 on the number pad to select a radio button and then tab to the next page button and start all over again all with anchor... please show me... I'm never heard of such a thing... the anchors controlling the tab order... can't wait for your example in these scripts.

 

by: TheLearnedOnePosted on 2009-11-05 at 15:56:20ID: 25755463

Reference:

http://www.w3schools.com/HTML/html_links.asp

Named anchor element:
    <a name="label">Any content</a>

Jump to named anchor
    <a href="#label">Any content</a>

You would just need to add an anchor element with a name where you need to jump, and then set the URL to the page with the #name added.

 

by: jeremyBass26Posted on 2009-11-05 at 17:56:18ID: 25756070

wow... no no no.. what links... this is a form... how how this correlate... I'm sorry I have to ask did you look at the form... I just am not drawing the line to how an anchor how alow the user to use the numberpad to fill out a form... May be the "tab" phrase was a seemy poor choice of words.

As I see it now youre talking link elements.. I'm talking form elements... If I'm wrong I'm sorry but please provide the form example that allows for a use to select one of the radio group options with the number pad... much like the postback activates the next button.


Thank you
Jeremy

 

by: TheLearnedOnePosted on 2009-11-06 at 06:53:29ID: 25759577

Jeremy,

Now that sounds like you are talking about set focus to a control that is in the RadioButton group associated with with a link on the page.  Can you tell which RadioButton you would like to focus for each link?

 

by: jeremyBass26Posted on 2009-11-06 at 11:56:31ID: 25762484

What links there are no links... this is one long form split by panels... what I want is if a user presses 1 then the first radio group option is selected, so on with 2,3,4,5 or as many numbers as number of the radio group options.... and if enter is press the next button is triggered...

 

by: TheLearnedOnePosted on 2009-11-06 at 18:06:57ID: 25764663

The words are pushing me to suggest a JavaScript function to listen for a key press event, and then set the focus for a control.

Get key press event using JavaScript
http://www.geekpedia.com/tutorial138_Get-key-press-event-using-JavaScript.html

 

by: jeremyBass26Posted on 2009-11-23 at 08:30:53ID: 31650099

yes js is always an option thank you

20120131-EE-VQP-002

3 Ways to Join

30-Day Free Trial

The Experts

98% positive feedback on 31,087 answers since March 2000. angeliii is a Microsoft Most Valuable Professional for his work with MS SQL Server & Develoment.

He has also proven his knowledge of Visual Basic Programming, PHP Scripting and Oracle Databases.

The Experts

97% positive feedback on 10,752 answers since July 2000. lrmoore has more than 18 years experience in the networking industry.

The six-time Mircosoft MVPs specialties include firewalls, virtual private networking, and network management.

Testimonials

"...and excellent source for support... Kind of like having your very own IT dept." Electriciansnet

Testimonials

"I was apprehensive at signing up at first. However... it has already made my life as an IT administrator much easier." JaCrews

Testimonials

"WOW! You guys have great, active, and knowledgeable people on here." moore50

Business Clients

Business Clients

In the Press

"If you’ve got a question... Experts Exchange can supply an answer.”

In the Press

"...an invaluable aid for both IT professionals and those who require tech support."

In the Press

"where IT professionals provide quick answers on just about any topic"

Business Account Plans

Loading Advertisement...