Форум: "Прочее";
Текущий архив: 2008.03.02;
Скачать: [xml.tar.bz2];
ВнизASP3 Найти похожие ветки
← →
toto (2008-01-28 10:53) [0]Есть один старый проект, несколько поправок сделано, а на этой странице остался вопрос.
Поиск работает хорошо, в результате: Индекс - Город(или место жительства, поселок). Оба значения надо перенести на предедущую страницу.
<tr>
<td align=right>
Ville :
</td>
<td colspan="2">
<%
Response.Write(" strVilleSaisie : "" + cstr(strVilleSaisie))
%>
<select tabindex="1" class="selectxt" size="1" name="ville" maxLength="32" onchange="rempliChamp(document.dossier)">
<%
Dim objConn
"ouverture de la base, creation de l objet ADO de connexion
Set objConn = Server.CreateObject("ADODB.Connection")
"connexion, se refere au fichier sourceDonnees.asp pour se refere aux infos de connexion
objConn.Open strConnexion
"************************************************************************
"Recuperation villes associées au departement
"avec la procedure stockee IPC_HEXAPOST_VILLE_CP_sp
"IPC_HEXAPOST_PAYS_VILLE_CP_sp "BFR","98","","MC"
Dim IPCLibVille
Dim RSVille
Dim strCodePostal
Dim strLibelleVille
Dim codste
codste = "BFR"
"Création de l"objet ADO Command
Set IPCLibVille = Server.CreateObject("ADODB.Command")
"Initialisation de l"objet ADO
IPCLibVille.ActiveConnection = objConn
IPCLibVille.CommandType = adCmdStoredProc
IPCLibVille.CommandText = "IPC_HEXAPOST_PAYS_VILLE_CP_sp"
"Création et initialisation des paramètres d"entrées de l"objet ADO
call IPCLibVille.Parameters.Append(IPCLibVille.CreateParameter("@codste",adVarChar,ad ParamInput,64,codste))
call IPCLibVille.Parameters.Append(IPCLibVille.CreateParameter("@codePostal",adVarCha r,adParamInput,64,strCP))
call IPCLibVille.Parameters.Append(IPCLibVille.CreateParameter("@codePays",adVarChar, adParamInput,64,strCDPAYS))
call IPCLibVille.Parameters.Append(IPCLibVille.CreateParameter("@ville",adVarChar,adP aramInput,64,strVilleSaisie))
"On exécute l"objet ADO
Set RSVille = IPCLibVille.Execute
" Affichage
" tant qu"il y a des enregistrements
while not RSVille.eof
strCodePostal = RSVille("CODE")
strLibelleVille = RSVille("LIBELLE")
strVilleSaisie = RSVille("LIBELLE")
Response.Write("<OPTION value=" + cstr(strCodePostal) + cstr(strVilleSaisie) + ">" + cstr(strCodePostal) + " - " + cstr(strVilleSaisie) + "</OPTION>")
RSVille.MOVENEXT " suivant
wend
" Fermeture des objets
RSVille.close
Set RSVille = Nothing
"************************************************************************
%>
</select>
</td>
</tr>
Значение Индекса передается нормально, а вот место жительства если состоит из нескольких слов, типа "Мая маленькая деревня", то передается только первое слово "Мая". Что я не так делаю? Где отрезается всё остальное, Заранее большое Спасибо
<script language="JavaScript">
function trim(string)
{
return string.replace(/(^\s*)|(\s*$)/g,"");
}
function recherche(formulaire)
{
var url = "validationVilleCodePostal.asp?CP=" + formulaire.codePostal.value + "&VILLESAISIE=" + formulaire.villesaisie.value + "&CDPAYS=<%=strCDPAYS%>"+"&champ1=<%=strChamp1%>&champ2=<%=strChamp2%>";
location.href = url;
}
function rempliChamp(formulaire)
{
var chaine = new String(formulaire.ville.value);
chaine = trim(chaine);
formulaire.CP.value = chaine.substring(0,5);
formulaire.VILLENOUV.value = chaine.substring(5,32);
formulaire.codePostal.focus();
}
function GO(formulaire)
{
window.opener.dossier.<%=strChamp1%>.value = formulaire.CP.value;
window.opener.dossier.<%=strChamp2%>.value = formulaire.VILLENOUV.value;
/*window.opener.dossier.<%=strChamp2%>.value = formulaire.VILLESAISIE.value;*/
window.close();
}
</script>
<body bgcolor="#ffeeee" text="#000080" class="BODY1" onload="rempliChamp(document.dossier)" bgproperties="fixed">
<form name="dossier" action="validationVilleCodePostal.asp?CP=<%=strCP%>&VILLESAISIE=<%=strVilleSaisie%>&CDPAYS=<%=strCDPAYS%>&champ1=<%=strChamp1%>&champ2=<%=strChamp2%>" method="post">
Liste des villes associées au code postal :
<HR>
← →
homm © (2008-01-28 11:08) [1]Ну и кто мне втирал про объектную программную модель ASP? :)
Идеологически — тот же php, только вместо краткого echo нужно писать Response.Write() :)
Попытлся разобратся хотя бы в JS, но немецкий язык это жесть, лучше бу через обфускатор прогнали, и то понтнее было бы читать :)
← →
ketmar © (2008-01-28 11:27) [2]значения атрибутов кто закавычивать будет?
← →
ketmar © (2008-01-28 11:28) [3]>[1] homm ©(28.01.08 11:08)
это не немецкий.
← →
toto (2008-01-28 11:31) [4]<tr>
<td align=right>
Code postal :
</td>
<td>
<input class="inputxt2" type=text name="codePostal" size="5" maxLength="5">
</td>
<td align=right>
<td align="center">
</td>
</tr>
<tr>
<td align=right>
Ville :
</td>
<td>
<input class="inputxt2" type=text name="villesaisie" size="32" maxLength="32">
</td>
<td align="center">
<input class=button onclick="javascript:recherche(document.dossier);" type="button" value="Rechercher" id="button1" name="button1">
</td>
</tr>
*****************************************************
<BR>
<BR>
<CENTER>
<input class=button onclick="javascript:GO(document.dossier);" type="button" value="Valider" id="button1" name="button1">
</CENTER>
<input name="CP" maxlength="5" type="hidden">
<input name="VILLENOUV" maxlength="32" type="hidden">
</FORM>
</body>
</html>
← →
toto (2008-01-28 11:38) [5]
> ketmar © (28.01.08 11:27) [2]
> значения атрибутов кто закавычивать будет?
Поясни
← →
homm © (2008-01-28 11:46) [6]> [0] toto (28.01.08 10:53)
> var url = "validationVilleCodePostal.asp?CP=" + formulaire.codePostal.val
> ue + "&VILLESAISIE=" +
Так нельзя. Если формируеш URL, будь добр воспользуйся функцией url_encode (лень искать, как она точно пишется в JS)
← →
ketmar © (2008-01-28 11:57) [7]"<OPTION value=" + cstr(strCodePostal) + cstr(strVilleSaisie) + ">"
так вот значение валуя кто закавычивать будет? во-первых, без кавычек оно нестандартно. а во-вторых, без кавычек значением считается последовательность символов до первого пробела. что и даёт в итоге обрезание.
← →
toto (2008-01-28 12:20) [8]
> ketmar © (28.01.08 11:57) [7]
> "<OPTION value=" + cstr(strCodePostal) + cstr(strVilleSaisie)
> + ">"
> так вот значение валуя кто закавычивать будет? во-первых,
> без кавычек оно нестандартно. а во-вторых, без кавычек
> значением считается последовательность символов до первого
> пробела. что и даёт в итоге обрезание.
Работает. My respects!!!
← →
ketmar © (2008-01-28 12:23) [9]>[8] toto (28.01.08 12:20)
кстати, и на [6] внимание обрати. функцию зовут escape().
← →
Медвежонаг (2008-01-28 12:35) [10]
> Ну и кто мне втирал про объектную программную модель ASP?
> :)
> Идеологически — тот же php, только вместо краткого echo
> нужно писать Response.Write() :)
Объектная модель программирований используется в ASP.NET, который очень сильно отличается от классического ASP.
← →
Anatoly Podgoretsky © (2008-01-28 15:30) [11]> homm (28.01.2008 11:08:01) [1]
Не знаю кто тебе втирал?
Может ты не знаешь что ASP <> ASP/NET
А что такое ASP3 приходится только задумываться.
Страницы: 1 вся ветка
Форум: "Прочее";
Текущий архив: 2008.03.02;
Скачать: [xml.tar.bz2];
Память: 0.49 MB
Время: 0.046 c