Vraag : Hoe te om „te creëren de Plaatsende“ pagina geef van het Profiel uit door Dreamweaver

Ik wens om mijn gebruikers toe te staan hun profiel kunnen uitgeven die als wachtwoord of e-mail plaatsen.
I heeft een vorm van het tussenvoegselverslag toegevoegd, maar ik weet niet het hoe te om het te plaatsen om het dynamische archief enkel te wijzigen toevoegend geen nieuw verslag aan database.
" codeBody " 
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:

<%@LANGUAGE= " VBSCRIPT " CODEPAGE= " 65001 " %>

<%
Schemerige MM_editAction
MM_editAction = CStr (Request.ServerVariables („SCRIPT_NAME“))
Als (Request.QueryString <> "") toen
  MM_editAction = MM_editAction & „?“ & Server.HTMLEncode (Request.QueryString)
Eind als

'van Boole om verslag te aborteren geef uit
Verduister MM_abortEdit
MM_abortEdit = vals
%>
<%
'Implementatie IIf
Functie MM_IIf (voorwaarde, ifTrue, ifFalse)
  Als voorwaarde = "" toen
    MM_IIf = ifFalse
  Anders
    MM_IIf = ifTrue
  Eind als
De Functie van het eind
%>
<%
Als (CStr (Verzoek („MM_insert“)) = „form1“) toen
  Als (niet MM_abortEdit) toen
    'voer het tussenvoegsel uit
    Verduister MM_editCmd

    Plaats MM_editCmd = Server.CreateObject („ADODB.Command“)
    MM_editCmd.ActiveConnection = MM_NBconnect1_STRING
    MM_editCmd.CommandText = „NEEM IN dbo op. Login (FirstName, Achternaam, Relatie, e-mail, Gebruikersbenaming, Wachtwoord) WAARDEN (? ? ? ? ? ?)“ 
    MM_editCmd.Prepared = waar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter („param1“, 202, 1, 15, Request.Form („FirstName“)) 'adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter („param2“, 202, 1, 20, Request.Form („Achternaam“)) 'adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter („param3“, 202, 1, 20, Request.Form („Relatie“)) 'adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter („param4“, 202, 1, 50, Request.Form („e-mail“)) 'adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter („param5“, 202, 1, 15, Request.Form („gebruikersbenaming“)) 'adVarWChar
    MM_editCmd.Parameters.Append MM_editCmd.CreateParameter („param6“, 202, 1, 15, Request.Form („Wachtwoord“)) 'adVarWChar
    MM_editCmd.Execute
    MM_editCmd.ActiveConnection.Close
  Eind als
Eind als
%>
<%
Schemerige Recordset1__MMColParam
Recordset1__MMColParam = „1“
Als (Zitting („MM_UserName“) <> "") toen 
  Recordset1__MMColParam = Zitting („MM_UserName“)
Eind als
%>
<%
Schemerige Recordset1
Schemerige Recordset1_cmd
Schemerige Recordset1_numRows

Vastgesteld Recordset1_cmd = Server.CreateObject („ADODB.Command“)
Recordset1_cmd.ActiveConnection = MM_NBconnect1_STRING
Recordset1_cmd.CommandText = „SELECTEER * UIT dbo. Login WAAR Gebruikersbenaming =?“ 
Recordset1_cmd.Prepared = waar
adVarChar Recordset1_cmd.Parameters.Append Recordset1_cmd.CreateParameter („param1“, 200, 1, 15, Recordset1__MMColParam) '

Vastgesteld Recordset1 = Recordset1_cmd.Execute
Recordset1_numRows = 0
%>




Untitled Document






  

    
        >  
        >  

      

          
      

      

        
Hi <%= (Recordset1.Fields.Item („Relatie“). Waarde) %>

        
  

      

      

          
        
          
                " juiste " 
                " juiste " 
                nowrap= " nowrap " align= " juiste " >Relation 
                
                " juiste " 
                " juiste " 
                " juiste " 
                " juiste " 
        >  

              
FirstName: 
                
              

              
Surname: 
                
              

              

              

              
Email: 
                
              

              
Username: 
                
              

              
Password: 
                
              

              
  
                
        
        
  

      

      

          
        >  
          
      

      

          
          
          
          
      

    

  



<%
Recordset1.Close ()
Vastgesteld Recordset1 = niets
%>

Antwoord : Hoe te om „te creëren de Plaatsende“ pagina geef van het Profiel uit door Dreamweaver

Voor het toestaan van gebruikers om gegevens uit te geven,
Cre�ër verborgen gebied om unieke identiteitskaart van dbo op te slaan. Login lijst

Voorbeeld: (Als de gebruikersbenaming primaire sleutel toen) is:
ername "). Waarde) %> "/>

gebruik dit gebied om de gegevens bij te werken:
MM_editCmd.CommandText = „updatedbo. Login vastgestelde FirstName=? , Surname=? waar user_name =?“
Andere oplossingen  

 
programming4us programming4us