Recomendado: Código de ejemplo completo de votación de IP restringida ASP Debido a las relaciones laborales, una de las funciones es votar sobre los usuarios, que requiere que la misma IP vote sobre el mismo usuario solo una vez, publique el código ASP: % 'Autor: Wurong Fuente: DB_Conn (DBS) VoteUsername = Trim (request.queryString (username)) RS_Create (seleccione UserName del [usuario] donde useName =' '
Debido a las relaciones laborales, una de las funciones es aumentar la otra parte como amiga. Como se muestra en la imagen:
El método utilizado es AJAX, que requiere un código menos apropiado:
<a href = javaScript: void (0); onClick = add_username ('< %= rs (nombre de usuario) %> ');> Agregar como amigo </a>, la verificación JS utilizada:
<script language = javaScript src = ajax.js> </script>
<script>
// Agregar usuario
función add_username (usr) {
//
var sta;
var userName = usr;
if (username! =) {
if (username! =) {
username = username =+username;
sta = postthttp (nombre de usuario, add_friend.asp);
if (sta == false) {
alerta (adición fallida, error del servidor);
}demás{
if (parseInt (sta) == 1)
Alerta (¡felicitaciones, amigos se agregaron con éxito!);
demás
alerta (sta);
}
}demás{
alerta (ingrese el nombre de su amigo);
}
}
}
</script>
Código AJAX.JS:
http_request = false;
if (window.xmlhttprequest) {
// Para navegadores como Mozilla, Netscape, Safari, etc., cree xmlhttprequest
http_request = new xmlhttprequest ();
if (http_request.overridemimeType) {
// Si el encabezado que responde por el servidor no es texto/XML, puede llamar a otros métodos para modificar el encabezado
http_request.overridemimeType ('text/xml');
}
} else if (window.activexObject) {
// Para el navegador de Internet Explorer, cree xmlhttprequest
intentar {
http_request = new ActiveXObject (msxml2.xmlhttp);
} catch (e) {
intentar {
http_request = new ActiveXObject (microsoft.xmlhttp);
} catch (e) {}
}
}
return http_request;
}
// Obtener el respuestas de la URL
función getResponStext (URL)
{
http_request = getRequest ();
http_request.open ('get', url, falso);
http_request.send (nulo);
if (http_request.readyState == 4)
{
// recibió una respuesta completa del servidor
if (http_request.status == 200) {
// El valor de respuesta del servidor HTTP está bien
requestDoc = http_request.responsetext;
// Escribe la cadena devuelta por el servidor al área en la página con el mensaje de ID
}
demás {
requestDoc = http_request.status;
}
}
devolver requestDoc;
}
// Publicar envío de datos
función postthttp (str, url) {
http_request = getRequest ();
http_request.open ('post', url, falso);
http_request.setRequestHeader (contenido-longitud, str.length);
http_request.setRequestHeader (Content-Type, Application/X-WWW-Form-URLEncoded);
http_request.send (str);
if (http_request.readyState == 4)
{
// recibió una respuesta completa del servidor
if (http_request.status == 200) {
// El valor de respuesta del servidor HTTP está bien
requestDoc = http_request.responsetext;
// Escribe la cadena devuelta por el servidor al área en la página con el mensaje de ID
devolver requestDoc;
}demás{
// requestDoc = http_request.status;
devolver falso;
}
}
}
// Obtener la respuestaxml de URL
función getxmlResponsEtext (URL)
{
http_request = getRequest ();
http_request.open ('get', url, falso);
http_request.send (nulo);
if (http_request.readyState == 4)
{
// recibió una respuesta completa del servidor
if (http_request.status == 200) {
// El valor de respuesta del servidor HTTP está bien
requestDoc = http_request.Responsexml;
// Escribe la cadena devuelta por el servidor al área en la página con el mensaje de ID
}
demás {
requestDoc = http_request.status;
}
}
devolver requestDoc;
}
Luego procesarlo en add_friend.asp.
<%
Respuesta.contentType = text/html; Charset = GB2312
'El programa de proceso no se publicará. Primero, determine si el usuario ha iniciado sesión, si se ha aprobado el nombre de usuario del amigo, si el nombre de usuario del amigo es legal, si el nombre de usuario del amigo se agrega por primera vez, etc. Si el aumento es correcto, regresa 1
Si add_friend = 1 entonces 'si puedes agregar amigos correctamente, add_friend = 1
Respuesta. Write 1 'Este valor se devuelve automáticamente a JS
Demás
Hubo un error en respuesta. Write 'por favor verifique el código
Final si
%>
Solicitud de retorno como se muestra en la figura:
Compartir: los números largos de ASP están separados por comas para mostrar el código de instancia % De función Coma (str) si no (isnumérico (str)) o str = 0 entonces resultado = 0 elseif len (fix (str)) 4 entonces resultado = str else pos = instr (1, str ,.) si pos 0 entonces dec = mid (str, pos) final si res = strreverse (fix (str)) bucleCount = 1 while loopCount =