| |
18/12/2007, 16:07
| #1 (permalink) |
| Üye Üyelik Tarihi: 12/2006
Mesaj: 52
|  asp içinde javascript çağırırken hata
merhaba, bir asp scriptim var. bu scriptte bir html tablo oluşturuyorum ve sütunlardan biride radio. bu radio ya tıkladığımda javascriptle tıklanan satırın hangi kayıda ait olduğunu anlamak için id'si hidden bir alana yazdırılıyor fakat bir türlü yazdıramadım, sürekli sayfanın sol alt köşesinde javascript hatası olduğunu gösteriyor. document.frmIndex.txtID[...] value is null or not an object gibi bir hata veriyor. Index.asp aşağıdaki gibi ayrıca ekte de var. <!--#Include File="adovbs.inc"--> <!--#include file="pages_support.asp"--> <% Dim Conn,rs,SQL Set Conn=Server.CreateObject("ADODB.Connection") Set rs=Server.CreateObject("ADODB.RecordSet") Conn.ConnectionString="Provider=Microsoft.Jet.OLED B.4.0;Data Source=" & server.MapPath("Dat1.mdb") & " ;Persist Security Info=False" conn.Open %> <HTML> <HEAD> <LINK title="style" href="Global.css" type="text/css" rel="stylesheet"> <title>Grid Demo</title> <script> function ClickChk(i) { document.frmIndex.asd.value=document.frmIndex.txtI D[i].value; } function New() { window.open("ProductEntry.asp?qs=0","myWin","width =400, height=165, top=200, left=200,toolbar=0, menubar=0, location=0, status=0, scrollbars=0, resizable=0,directories=no") } function Edit(ID) { var qs; qs=ID if(qs=="0") { abc() return false; } window.open("ProductEntry.asp?qs="+ID,"myWin","wid th=400, height=165, top=200, left=200,toolbar=0, menubar=0, location=0, status=0, scrollbars=0, resizable=0") } function Upload(ID) { var qs; qs=ID if(qs=="0") { abc() return false; } window.open("UploadImg.asp?qs="+ID,"myWin","width= 400, height=40, top=220, left=200,toolbar=0, menubar=0, location=0, status=0, scrollbars=0, resizable=0") } </script> <SCRIPT LANGUAGE="vbscript"> Function abc() msgbox "Select A Record First.",vbInformation,"Edit" End Function Function Delete(ID) Dim qs qs=ID If ID="0" Then msgbox "Select A Record First.",vbInformation,"Delete" Exit Function End If If msgbox("Delete Record!!! " & vbCrLf & "Are You Sure ?",vbYesNo+vbQuestion,"Delete")=vbYes Then document.frmIndex.action="Delete.asp?qs="&ID document.frmIndex.method="post" document.frmIndex.submit() End If End Function </SCRIPT> </HEAD> <body topmargin="10" leftmargin="0" bgcolor="#ffffff"> <form name="frmIndex" action="Index.asp" method="post"> <table width="500" cellpadding="0" cellspacing="0" align="center" border="1" bordercolor="#191970" ID="Table1"> <tr> <td height="20" align="center" bgcolor="#191970"> <font face="verdana" size="1" color="#ffffff"><b>SEARCH</b></font> </td> </tr> <tr> <td> <table width="400" cellpadding="0" cellspacing="0" align="center" border="0" bordercolor="#191970" bgcolor="Ivory"> <tr> <td height="10"></td> </tr> <tr> <td align="right"><font face="verdana" size="1">Product Name</font></td> <td><font face="verdana" size="1">:</font></td> <td><input type="text" name="txtProductName" value='<%=Request.Form("txtProductName")%>' class="in" size="15"></td> </tr> <tr> <td align="right"><font face="verdana" size="1">Category</font></td> <td><font face="verdana" size="1">:</font></td> <td><input type="text" name="txtCategory" value='<%=Request.Form("txtCategory")%>' class="in" size="15"></td> <td align="right"><font face="verdana" size="1">Price</font></td> <td><font face="verdana" size="1">:</font></td> <td><input type="text" name="txtPrice" value='<%=Request.Form("txtPrice")%>' class="in" size="15" ID="txtPrice"></td> </tr> <tr> <td align="right"><font face="verdana" size="1">Stock Count</font></td> <td><font face="verdana" size="1">:</font></td> <td><input type="text" name="txtStockCount" value='<%=Request.Form("txtStockCount")%>' class="in" size="15" ID="txtStockCount"></td> <td align="right"><font face="verdana" size="1">Picture</font></td> <td><font face="verdana" size="1">:</font></td> <td> <input type="text" name="txtPicture" value='<%=Request.Form("txtPicture")%>' class="in" size="15" ID="txtPicture"> <input type="Submit" value="Go" class="btn" style="width:25;" ID="Button1" NAME="Button1"> </td> </tr> <tr> <td height="10"></td> </tr> </table> </td> </tr> </table> <table width="500" cellpadding="0" cellspacing="0" align="center" border="0" bordercolor="yellow"> <tr> <td height="1"></td> </tr> </table> <table width="550" cellpadding="0" cellspacing="0" align="center" border="1" bordercolor="#191970"> <tr> <td bgcolor="#191970" width="20" align="center"> <font face="verdana" size="1" color="#ffffff"><b>Product</b></font> </td> <td bgcolor="#191970" align="center" width="200"> <font face="verdana" size="1" color="#ffffff"><b>Name</b></font> </td> <td bgcolor="#191970" align="center" width="100"> <font face="verdana" size="1" color="#ffffff"><b>Category ID</b></font> </td> <td bgcolor="#191970" align="center" width="100"> <font face="verdana" size="1" color="#ffffff"><b>Price</b></font> </td> <td bgcolor="#191970" align="center" width="150"> <font face="verdana" size="1" color="#ffffff"><b>Stock Count</b></font> </td> <td bgcolor="#191970" align="center" width="50"> <font face="verdana" size="1" color="#ffffff"><b>Image</b></font> </td> <td bgcolor="#191970" width="3" align="center"> <font face="verdana" size="1" color="#ffffff"><b> </b></font> </td> </tr> <% SQL = "Select * From urunTablosu Where UrunID<>0 " IF Request.Form("txtProductName") <> "" Then SQL = SQL & " AND Ad like '" & Request.Form("txtProductName") & "%'" IF Request.Form("txtCategory") <> "" Then SQL = SQL & " AND KategoriID like '" & Request.Form("txtCategory") & "%'" IF Request.Form("txtPrice") <> "" Then SQL = SQL & " AND Fiyat like '" & Request.Form("txtPrice") & "%'" IF Request.Form("txtStockCount") <> "" Then SQL = SQL & " AND StokAdeti like '" & Request.Form("txtStockCount") & "%'" IF Request.Form("txtPicture") <> "" Then SQL = SQL & " AND Resim like '" & Request.Form("txtPicture") & "%'" rs.Open SQL,Conn,adOpenStatic,adLockReadOnly,adcmdtext If rs.RecordCount>0 Then i=-1 Dim IntPageSize, PageIndex, TotalPages, TotalRecords Dim RecordCount, RecordNumber,PageCount IntPageSize = 5 PageIndex = Request("PageIndex") If PageIndex = "" Then PageIndex = 1 RecordCount = rs.RecordCount RecordNumber = (PageIndex * IntPageSize) - (IntPageSize) rs.PageSize = intPageSize rs.AbsolutePage = PageIndex TotalPages = rs.PageCount Dim intPrev, intNext intPrev = PageIndex - 1 intNext = PageIndex + 1 If rs.EOF=True Then rs.MoveFirst%> <%Dim Count%> <%Count = 1%> <%Do while NOT rs.EOF AND Count <= IntPageSize%> <%If rs.EOF=False Then%> <%i=i+1%> <tr bgcolor="Ivory"> <td align="center" bgcolor="#191970"><input type="radio" value='<%=rs.Fields("UrunID")%>' onclick=ClickChk(<%=i%>); name="txtID"></td> <td><font face="verdana" size="1"> <%=rs.Fields("Ad")%></font></td> <td><font face="verdana" size="1"> <%=rs.Fields("KategoriID")%></font></td> <td><font face="verdana" size="1"> <%=rs.Fields("Fiyat")%></font></td> <td><font face="verdana" size="1"> <%=rs.Fields("StokAdeti")%></font></td> <td align="center"> <%If rs.Fields("Resim")<>"" Then%> <a href="<%=rs.Fields("Resim")%>" target=_blank><font face="verdana" size="1" color="#003366"><b>[View]</b></font></a> <%Else%> <%End If%> </td> <td align="center" bgcolor="#191970"> </td> </tr> <input type="hidden" value='<%=rs.Fields("Ad")%>' name="EName"> <input type="hidden" value='<%=rs.Fields("KategoriID")%>' name="Phone"> <input type="hidden" value='<%=rs.Fields("Fiyat")%>' name="Mobile"> <input type="hidden" value='<%=rs.Fields("StokAdeti")%>' name="Designation"> <input type="hidden" value='<%=rs.Fields("Resim")%>' name="Department"> <%End IF%> <%count = count + 1%> <%rs.MoveNext%> <%loop%> <%Response.Write "<tr><td Colspan=8 height=20 bgcolor=#191970 Align=Center>"%> <%call BuildNav2 (intPrev,IntNext,TotalPages)%> <%response.write "</td></tr>"%> <%rs.close%> <%Else%> <tr> <td align="center" bgcolor="#ffffff" colspan="8"> <font face="verdana" size="2" color="#cc3333"><b>No Record Found</b></font> </td> </tr> <%End IF%> </table> <table width="750" cellpadding="0" cellspacing="0" align="center" border="0" bordercolor="#191970"> <tr height="20"> <td bgcolor="#ffffff" align="center" width="200"></td> <td colspan="2" align="center" bgcolor="#ffffff"> <font face="verdana" size="1" color="#000000"> <label onclick="New()"> <span style="cursor: hand">[ ADD ]</span> </label> </font> <font face="verdana" size="1" color="#000000"> <label onclick="Upload(document.frmIndex.asd.value);"> <span style="cursor: hand">[ UPLOAD ]</span> </label> </font> <font face="verdana" size="1" color="#000000"> <label onclick="Edit(document.frmIndex.asd.value);"> <span style="cursor: hand">[ EDIT ]</span> </label> </font> <font face="verdana" size="1" color="#000000"> <label onclick="Delete(document.frmIndex.asd.value);"> <span style="cursor: hand">[ DELETE ]</span> </label> </font> </td> <td align="center" width="250" bgcolor="#ffffff"></td> </tr> <input type="hidden" value="0" Name="asd"> </table> </form> </body> </HTML> |
|  |
 |
| Bookmarks |
| Seçenekler | |
| |
Benzer Konular | ||||
| Konu | Konuyu açana göre | Forum | Cevap | En Son Mesaj |
| javascript içinde zamanla diğer javascript kodu çalıştırma | mahmuttt88 | Javascript / DHTML / Ajax | 1 | 20/10/2007 10:34 |
| Java'dan bir jasper dosyası çağırırken hata alıyorum. Acil lütfen! | ilkea | Java / JSP | 0 | 08/03/2007 10:37 |
| php içinde javascript kullanma | yelegin | PHP | 11 | 13/05/2006 22:59 |
| javascript içinde php | shark_hack | PHP | 0 | 12/08/2005 14:03 |
| perl içinde javascript kullandım ama bir hata var yardım edermisiniz? | webmeraklisi | Diğer Diller | 5 | 24/11/2003 14:54 |
| Reklamlar & Desteklenenler | |
| Hassas Valf | Hassas Kaplama | Antalyamız | Gazete | Ticari Bilişim | Hakan Müştak | Rüya Tabirleri | Kadın | Hastalıklar | Cepte msn ve e-posta | Webmaster | Antalya Aupair | Turkish Property Antalya | Forum | Chat | Perde | Adsl | Araba | bolindir.com | guncelle.com | livescore | Web Tasarım | evden eve nakliyat | forum | evden eve | sohbet | Resimcim| Kalifiye İnsan Kaynakları | Web Tasarım | Oyun | Yusuf KOÇ | Akın Yorulmaz | şiir | UFO | Web Tasarım | Oyunlar | Canlı Tv | |
