Pagina 1 di 2 1 2 ultimoultimo
Visualizzazione dei risultati da 1 a 10 su 11
  1. #1
    Utente bannato
    Registrato dal
    Jan 2003
    Messaggi
    2,407

    problemi di taglio su stringa e impostazione campo record [urgentissimo]

    idrecord = request(id)

    Partedestra = left(Posizione, len(Pozione) - 1)
    Partesinistra = right(Posizione, len(Pozione) - 1)

    ragazzi ho da tagliare in 2 parti la stringa di nome poszione che è composta da valori testo di 2 caratteri ad es. d5 f6, f7

    dove nella parte di destra ci sta la lettera e in quella di sinistra il numero.

    poi in base a questi 2 valori devo associare un campo del record per esempio se f1 allora camporecord = "nomefile1" se d5 allora camporecord = "descrizione5"
    questo perchè la procedura di update deve aggiornarmi solo quel campo del record

    come posso fare?
    e come comporre una query in cui dire..

    update tabella set camporecord where id = idrecord

    Grazie

  2. #2

    Re: problemi di taglio su stringa e impostazione campo record [urgentissimo]

    Originariamente inviato da Certe Notti
    idrecord = request(id)

    Partedestra = left(Posizione, len(Pozione) - 1)
    Partesinistra = right(Posizione, len(Pozione) - 1)

    ragazzi ho da tagliare in 2 parti la stringa di nome poszione che è composta da valori testo di 2 caratteri ad es. d5 f6, f7

    dove nella parte di destra ci sta la lettera e in quella di sinistra il numero.

    poi in base a questi 2 valori devo associare un campo del record per esempio se f1 allora camporecord = "nomefile1" se d5 allora camporecord = "descrizione5"
    questo perchè la procedura di update deve aggiornarmi solo quel campo del record

    come posso fare?
    e come comporre una query in cui dire..

    update tabella set camporecord where id = idrecord

    Grazie
    Se idrecord è sempre di 2 lettere fai:

    sx = left(Request(id),1)
    If sx = "d" Then
    s = "descrizione"
    Else
    s = "file"
    End If

    UPDATE tabella SET "&s&Right(Request("id"),1)" = 'valore da mettere'

  3. #3
    l'abbinamento sigla - nomecampo puoi farlo con una SELECT CASE o preparando un array da due dimensioni

  4. #4
    Utente bannato
    Registrato dal
    Jan 2003
    Messaggi
    2,407

    Re: Re: problemi di taglio su stringa e impostazione campo record [urgentissimo]

    Originariamente inviato da maxolino
    Se idrecord è sempre di 2 lettere fai:

    sx = left(Request(id),1)
    If sx = "d" Then
    s = "descrizione"
    Else
    s = "file"
    End If

    UPDATE tabella SET "&s&Right(Request("id"),1)" = 'valore da mettere'
    no calma idrecord è un valore come 1..2..3..4 ecc.
    camporecord è un valore tipo d5/f6 ecc

    quindi io devo fare l'update nel cercord contrasseganto dall'id che recupero e nel campo che associo a d5 tipo descrizione5 piuttosto che f6 ossia Nomefile6

    quinid una query dove ci sia:

    UPDATE tabella SET "& camporecord & "where id=" & idrecord almeno credo sia da fare così...

    grazie

  5. #5
    Camporecord come lo passi a quella pagina?

  6. #6
    Utente bannato
    Registrato dal
    Jan 2003
    Messaggi
    2,407
    poszione = request("position")

    è una selezione da form... è l'utente che seleziona quale fra file o descrizione andare a modificare.

    if (posizione = "d5") then
    camporecord = Descrizione5
    end if

  7. #7
    Utente bannato
    Registrato dal
    Jan 2003
    Messaggi
    2,407
    direi anzi...

    codice:
    	    if (ParteSinistra = "d") Then
    		  CampoRecord = Descrizione & ParteDestra
    		end if
    	    if (ParteSinistra = "f") Then
    		  CampoRecord = Nomefile & ParteDestra
    		end if
    ecco perchè devo prendere il valore posizione è dividerlo in 2 parti...

  8. #8
    Non riesco a capire come è strutturata la pagina...

    Tu hai un form dove uno sceglie o D o F e un altro dove sceglie un numero?

    Com'è strutturata la tabella del database e quali campi devi aggiornare?

  9. #9
    Utente bannato
    Registrato dal
    Jan 2003
    Messaggi
    2,407

    forse mi sto perdendo in un bicchiere d'acqua....

    codice:
    
    	if request("entrata")="Inserire nuovo File o Descrizione" then
    
            flag=0
    		'recupero i valori voluti
    		Numbrano = request("numbrano")
    		Posizione = request("position")
    		nuovainfo = request("valore")
    	
    	   if (Numbrano <> "") And (Posizione <> "") And (nuovainfo <> "") Then
    
    	    ParteSinistra = Left(Posizione,1)
    	    ParteDestra = Right(Posizione,1)	   
    		
            'Controllo ed imposto la poszione in cui registrare il valore
    		if (cint(ParteDestra) = 0) or (cint(ParteDestra) > 10) Then
    		 Flag= 3
    		else
    		End if
    		
    		If (Ucase(ParteSinistra) <> "D") or (Ucase(ParteSinistra) <> "F") Then
    		  Flag=4 
    		else   
            end if
    		
    	    if (Ucase(ParteSinistra) = "D") Then
    		  CampoRecord = "Descrizione" & ParteDestra
    	    else	  
    		  CampoRecord = "Nomefile" & ParteDestra
    		end if
    
    		'apro la connessione con il db
    		set myConn = server.CreateObject("ADODB.Connection")
    		dim strConnDb
    		strConnDb = ""
    		'strConnDb = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = G:/Progetti Lavori/Web Project/Da Fare/Tessuti/tessuti.mdb"
    		strConnDb = "Provider = Microsoft.Jet.OLEDB.4.0; Data Source = " & server.mappath("/mdb-database/trascrizioni.mdb")
    		myConn.Open(strConnDb)
    		set myRSComS = server.CreateObject("ADODB.Recordset")
    		mySqlSelect = "select * from trascrizioni where Id=" & Numbrano
    		myRSComS.Open mySqlSelect, myConn, 1 ,1        
    
    	    'effettuo il controllo del campo da aggiornare: è vuoto si o no?
    		If (myRSComS(???????) = "") Then 
              'Se il record è vuoto allora aggiorno il db!
    		  dim strInsertDati
    		  strInsertDati=""
    		  strInsertDati="update trascrizioni set" & CampoRecord &" where id=" & Numbrano
    		  strInsertDati=replace(strInsertDati,?????)			
    		  myConn.Execute (strInsertDati)
    		else
    		  Flag=2
    		End if
    
    		myRSComS.Close
    		set myRSComS=nothing	
    		myConn.Close
    		set myConn=nothing
    
    		Response.redirect("ins_successo.asp")
          
    	else
    	  Flag=1
    	  Response.redirect("modifica_trascrizioni.asp?Errore=" & flag)
    	end if
      end if
    allora:
    1) recupero i valori,
    2) controllo che tutti contengano un valore
    3) splitto in 2 parti la variabile posizione
    4) controllo che la partedestra non sia maggiore di 10 o uguale a 0
    5)Controllo che la parte sinistra non sia diversa da D o F e poi gli associo il nome + la ParteDestra
    6) apro il db ed estraggo il record secondo l'id uguale a Numbrano
    7) controllo che il campo (???)

    ecco come faccio a dirgli di prelevarmi il campo che corrisponde alla variabile CampoRecord?

    8) ipotizzando che il campo sia vuoto allora faccio l'update; la query sarà giusta...??

    9) e per associargli al campo la variabile??

    chiudo il tutto e me ne vado fuori dalle scatole

    raga mi dite dove ci sono incorrettezze e cosa devo fare per compretare le parti in ??????? panico....


    Grazie mille!

  10. #10
    Utente bannato
    Registrato dal
    Jan 2003
    Messaggi
    2,407
    Originariamente inviato da maxolino
    Non riesco a capire come è strutturata la pagina...

    Tu hai un form dove uno sceglie o D o F e un altro dove sceglie un numero?

    Com'è strutturata la tabella del database e quali campi devi aggiornare?
    forse il post che ho inserito qui sopra col codice completo ti può chiarire il tutto...

    in breve un form in cui l'utente

    1) inserirce l'id della canzone che desidera aggiornare l'id lo preleva da una tabella che può leggere nella stessa pagina
    2) la posizione all'interno del record su cui vuole efettuare la modifica d5 = Descrizione5; f7 = Nomefile7
    3) testoinput che vuole inserire nel campo del record.

    dopo di che invia i dati alla pagina e qui inizia l'elaborazione.
    come sopra descritta...


Permessi di invio

  • Non puoi inserire discussioni
  • Non puoi inserire repliche
  • Non puoi inserire allegati
  • Non puoi modificare i tuoi messaggi
  •  
Powered by vBulletin® Version 4.2.1
Copyright © 2025 vBulletin Solutions, Inc. All rights reserved.