ABA
יומן פעילות לוח שנה מבזקי חדשות תקנון RSS כותרות כותרות לפי תגובה ניקוי קוקיז IP להורדת אפליקציה
eBay AliExpress GearBest Amazon Booking Kiwi SkyScanner Trip Advisor


"כתבתי דף הרשמה שמעביר נתונים לטבלה אבל אני מקבל שגיאה"
גירסת הדפסה        
קבוצות דיון בניית אתרים נושא #11560 מנהל    סגן המנהל    מפקח   Winner    צל"ש   מומחה  
אשכול מספר 11560
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   17:52   01.02.07   
אל הפורום  
  כתבתי דף הרשמה שמעביר נתונים לטבלה אבל אני מקבל שגיאה  
 
   השגיאה שאני מקבל :
Microsoft OLE DB Provider for ODBC Drivers error '80040e07'

Data type mismatch in criteria expression.

/nirk/Project/Project Bagrot/Register.asp, line 129

השורה : oConn.execute(Sqlstring)

והטופס המלא:


<html dir="rtl">
	<head>
		<title> דף הרשמה </title>
	</head>
	<body>
		<table cellpadding=3>
		<form name="register" method="post">
			<tr>
				<td>
					שם משתמש:				
				</td>
				<td>
					<input type="text" name="userName" />
				</td>
			</tr>
			<tr>
				<td>	
					סיסמא:
				</td>
				<td>
					<input type="password" name="password" />
				</td>
			</tr>
			<tr>
				<td>
					שם פרטי:
				</td>
				<td>
					<input type="text" name="fName" />
				</td>
			</tr>
			<tr>
				<td>
					שם משפחה:
				</td>
				<td>
					<input type="text" name="lName" />
				</td>
			</tr>
			<tr>
				<td>
					שנת לידה:
				</td>
				<td>
					<input type="text" name="Year" />
				</td>
			</tr>
			<tr>
				<td>
					מספר טלפון:
				</td>
				<td>
					<input type="text" name="phone" size=7 />
					<select name="kidomet">
						<option value="050">050</option>
						<option value="052">052</option>
						<option value="054">054</option>
					</select>
				</td>
			</tr>
			<tr>
				<td>
					מין:
				</td>
				<td>
					זכר <input type="radio" name="gender" value="m" />
					נקבה <input type="radio" name="gender" value="m" />
				</td>
			</tr>
			<tr>
				<td>
					דואר אלקטרוני:
				</td>
				<td>
					<input type="text" name="email" />
				</td>
			</tr>
			<tr>
				<td>
					נפח מנוע:
				</td>
				<td>
					<select name="engine">
						<option value="50">50 סמ"ק</option>
						<option value="125">125 סמ"ק</option>
						<option value="250">250 סמ"ק</option>
						<option value="500">500 סמ"ק</option>
					</select>
				</td>
			</tr>
			<tr>
				<td>
					<input type="submit" value="שלח" />
				</td>
				<td>
					<input type="reset" value="נקה" />
				</td>
			</tr>
		</form>
		</table>
		<%
		if not isEmpty(request.form("userName")) then
			dim userName
			dim password
			dim fName
			dim lName
			dim Year
			dim phone
			dim kidomet
			dim gender
			dim email
			dim engine
			userName=request.form("userName")
			password=request.form("password")
			fName=request.form("fName")
			lName=request.form("lName")
			Year=request.form("Year")
			phone=request.form("phone")
			kidomet=request.form("kidomet")
			gender=request.form("gender")
			email=request.form("email")
			engine=request.form("engine")
			set oConn =server.CreateObject("adodb.connection")
			oConn.Open "Driver={Microsoft Access Driver (*.mdb)};"&_
				"Dbq=" & Server.MapPath("Register.mdb") & ";" &_
				"Uid=;"&_
				"Pwd=;"
			Sqlstring="insert into TblUsers values('"&userName&"','"&password&"','"&fName&"','"&lName&"','"&bYear&"','"&phone&"','"&kidomet&"','"&gender&"','"&email&"','"&engine&"')"
			oConn.execute(Sqlstring)
			oConn.Close
			set Oconn=Nothing
		End if
		%>
	</body>
</html>


                                שתף        
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

  האשכול     מחבר     תאריך כתיבה     מספר  
  נראה לי שהערך שאתה מכניס לאחד התאים לא מתאים לסוג התא CaTz 01.02.07 19:39 1
  אממ akoka 01.02.07 20:10 2
     לא הבנתי :\ KAN  01.02.07 20:13 3
         ככה akoka 01.02.07 20:32 4
             את המפתח הראשי הוצאתי כשהכנתי את הטבלה KAN  01.02.07 20:50 5
                 אממ akoka 01.02.07 20:59 6
                     עשיתי ככה וזה עדיין מראה אותה שגיאה KAN  01.02.07 21:01 7
                         תראה את הטופס אחרי השידרוג akoka 01.02.07 21:06 8
                             הנה: KAN  01.02.07 21:09 9
                                 או שנתת את אותו קוד או שאני לא רואה איפה כתבת אותם akoka 01.02.07 21:16 10
                                     מה לכתוב ? חח KAN  01.02.07 21:17 11
                                         |מדריך קצר| akoka 01.02.07 21:23 13
                                             שאלה KAN  01.02.07 21:29 14
                                                 אממ akoka 01.02.07 21:34 15
                                                     כנס KAN  01.02.07 21:38 16
                                 אחי, חכה כמה דקות אני מסדר לך את זה כמו שצריך.... MeToR 01.02.07 21:22 12
  אוקיי הנה: MeToR 01.02.07 22:01 17
     תודה רבה :} ויש לי שאלה KAN  01.02.07 22:12 18
         תשובות: MeToR 01.02.07 23:22 19
             תודה ועוד שאלה במשהו אחר KAN  02.02.07 12:01 20
                 כנס אחי... MeToR 02.02.07 13:36 22
                     הוא רוצה לדעתי שלא יכניסו משתמשים כפולים למסד:/ akoka 02.02.07 13:40 23
                         זה בדיוק מה שעשיתי... MeToR 02.02.07 13:43 24
                     תודה רבה :} KAN  02.02.07 15:32 25
                         מקודם זה עבד לי ועכשיו שום פעם לא עובד :[ KAN  02.02.07 16:05 26
                             פיתרון: MeToR 02.02.07 16:37 27
  בשביל זה אתה צריך ליצור id מפתח ייחודי . akoka 02.02.07 13:03 21

       
CaTz
חבר מתאריך 2.10.04
14537 הודעות, דרג אמינות חבר זה 		   19:39   01.02.07   
אל הפורום  
  1. נראה לי שהערך שאתה מכניס לאחד התאים לא מתאים לסוג התא  
בתגובה להודעה מספר 0
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
akoka

דרג אמינות חבר זה 		   20:10   01.02.07   
אל הפורום  
  2. אממ  
בתגובה להודעה מספר 0
 
   אתה לא אמור לבחור את השדות בטבלה שאליה אתה מכניס את הנתונים
זה אמור להיראות ככה

Sqlstring="insert into TblUsers (השדות בטבלה) values('"&userName&"','"&password&"','"&fName&"','"&lName&"','"&bYear&"','"&phone&"','"&kidomet&"','"&gender&"','"&email&"','"&engine&"')"


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   20:13   01.02.07   
אל הפורום  
  3. לא הבנתי :\  
בתגובה להודעה מספר 2
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
akoka

דרג אמינות חבר זה 		   20:32   01.02.07   
אל הפורום  
  4. ככה  
בתגובה להודעה מספר 3
 
   התכוונתי כשיצרת את הטבלה tblusers בחרת כמה שדות יהיו בו ואת השמות לשדות אז אתה צריך להכניס את השמות לשדות איפה שאמרתי לפי הסדר שכתבת את הValues לא צריך לכלול את שדה הid אם קבעת אותו כמפתח ייחודי.


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   20:50   01.02.07   
אל הפורום  
  5. את המפתח הראשי הוצאתי כשהכנתי את הטבלה  
בתגובה להודעה מספר 4
 
   כי זה עושה בעיות
ולא למדנו עוד להשמתמש בזה


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
akoka

דרג אמינות חבר זה 		   20:59   01.02.07   
אל הפורום  
  6. אממ  
בתגובה להודעה מספר 5
 
   כשיוצרים טבלת משתמשים חובה שיהיה מפתח זיהוי(id( ייחודי לכול משתמש כדי למנוע כפילויות במסד אבל בכול אופן גם אם אתה לא משתמש בid אתה חייב לעשות מה שאמרתי לך ולהכניס את השמות של השדות להפריד ביניהם כמובן עם פסיקים


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   21:01   01.02.07   
אל הפורום  
  7. עשיתי ככה וזה עדיין מראה אותה שגיאה  
בתגובה להודעה מספר 6
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
akoka

דרג אמינות חבר זה 		   21:06   01.02.07   
אל הפורום  
  8. תראה את הטופס אחרי השידרוג  
בתגובה להודעה מספר 7
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   21:09   01.02.07   
אל הפורום  
  9. הנה:  
בתגובה להודעה מספר 8
 
   ערכתי לאחרונה בתאריך 01.02.07 בשעה 21:09 בברכה, KAN
 

<html dir="rtl">
	<head>
		<title> דף הרשמה </title>
	</head>
	<body>
		<table cellpadding=3>
		<form name="register" method="post">
			<tr>
				<td>
					שם משתמש:				
				</td>
				<td>
					<input type="text" name="userName" />
				</td>
			</tr>
			<tr>
				<td>	
					סיסמא:
				</td>
				<td>
					<input type="password" name="password" />
				</td>
			</tr>
			<tr>
				<td>
					שם פרטי:
				</td>
				<td>
					<input type="text" name="fName" />
				</td>
			</tr>
			<tr>
				<td>
					שם משפחה:
				</td>
				<td>
					<input type="text" name="lName" />
				</td>
			</tr>
			<tr>
				<td>
					שנת לידה:
				</td>
				<td>
					<input type="text" name="Year" />
				</td>
			</tr>
			<tr>
				<td>
					מספר טלפון:
				</td>
				<td>
					<input type="text" name="phone" size=7 />
					<select name="kidomet">
						<option value="050">050</option>
						<option value="052">052</option>
						<option value="054">054</option>
					</select>
				</td>
			</tr>
			<tr>
				<td>
					מין:
				</td>
				<td>
					זכר <input type="radio" name="gender" value="m" />
					נקבה <input type="radio" name="gender" value="m" />
				</td>
			</tr>
			<tr>
				<td>
					דואר אלקטרוני:
				</td>
				<td>
					<input type="text" name="email" />
				</td>
			</tr>
			<tr>
				<td>
					נפח מנוע:
				</td>
				<td>
					<select name="engine">
						<option value="50">50 סמ"ק</option>
						<option value="125">125 סמ"ק</option>
						<option value="250">250 סמ"ק</option>
						<option value="500">500 סמ"ק</option>
					</select>
				</td>
			</tr>
			<tr>
				<td>
					<input type="submit" value="שלח" />
				</td>
				<td>
					<input type="reset" value="נקה" />
				</td>
			</tr>
		</form>
		</table>
		<%
		if not isEmpty(request.form("userName")) then
			dim userName
			dim password
			dim fName
			dim lName
			dim Year
			dim phone
			dim kidomet
			dim gender
			dim email
			dim engine
			userName=request.form("userName")
			password=request.form("password")
			fName=request.form("fName")
			lName=request.form("lName")
			Year=request.form("Year")
			phone=request.form("phone")
			kidomet=request.form("kidomet")
			gender=request.form("gender")
			email=request.form("email")
			engine=request.form("engine")
			set oConn =server.CreateObject("adodb.connection")
			oConn.Open "Driver={Microsoft Access Driver (*.mdb)};"&_
				"Dbq=" & Server.MapPath("Register.mdb") & ";" &_
				"Uid=;"&_
				"Pwd=;"
			Sqlstring="insert into TblUsers values('"&userName&"','"&password&"','"&fName&"','"&lName&"','"&Year&"','"&phone&"','"&kidomet&"','"&gender&"','"&email&"','"&engine&"')"
			oConn.execute(Sqlstring)
			oConn.Close
			set Oconn=Nothing
		End if
		%>
	</body>
</html>

בטבלה יש כמה משתנים שהגדרתי מסוג מספרי
יכול להיות שזה עושה בעיה ?


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
akoka

דרג אמינות חבר זה 		   21:16   01.02.07   
אל הפורום  
  10. או שנתת את אותו קוד או שאני לא רואה איפה כתבת אותם  
בתגובה להודעה מספר 9
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   21:17   01.02.07   
אל הפורום  
  11. מה לכתוב ? חח  
בתגובה להודעה מספר 10
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
akoka

דרג אמינות חבר זה 		   21:23   01.02.07   
אל הפורום  
  13. |מדריך קצר|  
בתגובה להודעה מספר 11
 
   שאתה מכניס נתונים לטבלה לא משנה באיזה שפה אם זה בASP או בPHP המסד
שלך בנוי מטבלה וכול השדות שבחרת שיהיו שם,למשל ניקח את הדוגמא שלך
בנית טבלת משתמשים אז אמור ליהיות בא

שדה Firstname

שדה Lastname

שדה Username
שדה Password
ואימייל וכולה..

בכול אופן שאתה יוצר שאילתא אתה לא יכול להכריז רק על הערכים שאתה
מכניס למסד הVALUES אתה צריך גם להכריז על השדות במסד זה מבצע כך


Sqlstring="insert into TblUsers (username,password,fname) values('"&userName&"','"&password&"','"&fName&"','"&lName&"','"&bYear&"','"&phone&"','"&kidomet&"','"&gender&"','"&email&"','"&engine&"')"

כמובן שרק שיערתי את השמות של השדות שלך אני לא באמת יודע איך קראת להם אבל זה העיקרון של מה שאתה צריך לעשות.


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   21:29   01.02.07   
אל הפורום  
  14. שאלה  
בתגובה להודעה מספר 13
 
   הערכים ששמתי בתוך ה values
זה הערכים של הטבלה
אז אני אמור לשים את זה גם לפני ה values בסוגריים ?


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
akoka

דרג אמינות חבר זה 		   21:34   01.02.07   
אל הפורום  
  15. אממ  
בתגובה להודעה מספר 14
 
   הערכים ששמת בVALUES הם לא ההערכים של הטבלה ולא.ואני לא מבין אני בטוח שאתה יצרת את המסד נתונים הזה ואת הטבלאות בתוכו אתה אמור לדעת שמות השדות של כול טבלה:/


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   21:38   01.02.07   
אל הפורום  
  16. כנס  
בתגובה להודעה מספר 15
 
   המורה שלנו הביאה לנו דוגמה לטופס כזה
וזה מה שהיא רשמה

Sqlstring="insert into TblUsers values('"&userName&"')"

אני עשיתי גם טופס פשוט כזה
עם 3 שדות בטבלה וזה עבד
ולא הוספתי שום דבר לפני


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
MeToR
חבר מתאריך 26.1.07
11 הודעות, דרג אמינות חבר זה 		   21:22   01.02.07   
אל הפורום  
  12. אחי, חכה כמה דקות אני מסדר לך את זה כמו שצריך....  
בתגובה להודעה מספר 9
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
MeToR
חבר מתאריך 26.1.07
11 הודעות, דרג אמינות חבר זה 		   22:01   01.02.07   
אל הפורום  
  17. אוקיי הנה:  
בתגובה להודעה מספר 0
 
   ערכתי לאחרונה בתאריך 01.02.07 בשעה 22:07 בברכה, MeToR
 
שיניתי את ה-year ל-yearborn בגלל ש-year זאת מילה שמורה ב-ASP.
במסד נתונים הכל טקסט, חוץ מ-yearborn.

דף ה-signup.asp:


<html dir="rtl">	
<head>		
<meta http-equiv="Content-Type" content="text/html; charset=windows-1255">
<title> דף הרשמה </title>	
</head>	
<body>			
<form name="register" method="post" action="signup.asp">
	<table cellpadding=3>				
		<tr>				
			<td> שם משתמש: </td>				
			<td> <input type="text" name="username" /> </td>			
		</tr>			
		<tr>
			<td> סיסמא: </td>				
			<td> <input type="password" name="password" /> </td>			
		</tr>			
		<tr>				
			<td> שם פרטי: </td>				
			<td> <input type="text" name="fname" /> </td>			
		</tr>			
		<tr>				
			<td> שם משפחה: </td>				
			<td> <input type="text" name="lname" />	</td>			
		</tr>			
		<tr>				
			<td> שנת לידה: </td>				
			<td> <input type="text" name="yearborn" /> </td>			
		</tr>			
		<tr>				
			<td> מספר טלפון: </td>				
			<td> <input type="text" name="phone" size=7 />
				<select name="kidomet">						
					<option value="050">050</option>						
					<option value="052">052</option>				
					<option value="054">054</option>					
				</select>				
			</td>			
		</tr>			
		<tr>				
			<td> מין: </td>	
			<td> זכר <input type="radio" name="gender" value="m" />	
				נקבה <input type="radio" name="gender" value="m" />				
			</td>			
		</tr>			
		<tr>				
			<td> דואר אלקטרוני: </td>				
			<td> <input type="text" name="email" /> </td>			
		</tr>			
		<tr>				
			<td> נפח מנוע: </td>				
			<td> <select name="engine">	
					<option value="50">50 סמ"ק</option>						
					<option value="125">125 סמ"ק</option>						
					<option value="250">250 סמ"ק</option>						
					<option value="500">500 סמ"ק</option>					
				</select>				
			</td>			
		</tr>			
		<tr>				
			<td> <input type="submit" value="שלח" /> </td>				
			<td> <input type="reset" value="נקה" /> </td>			
		</tr>
	</table>		
</form>				
<%		
	if not isEmpty(request.form("userName")) then			
		dim username, password, fname, lname, yearborn, phone, kidomet, gender, email, engine			
		
		username=request.form("username")			
		password=request.form("password")			
		fname=request.form("fname")			
		lname=request.form("lname")			
		yearborn=request.form("yearborn")			
		phone=request.form("phone")			
		kidomet=request.form("kidomet")			
		gender=request.form("gender")			
		email=request.form("email")			
		engine=request.form("engine")			
		
		set oConn =server.CreateObject("adodb.connection")	
		oConn.mode = 3		
		oConn.Open "Driver={Microsoft Access Driver (*.mdb)}; Dbq=" & Server.MapPath("Register.mdb") &  ";Uid=; Pwd=;"
					
		Sqlstring="INSERT into TblUsers (username,password,fname,lname,yearborn,phone,kidomet,gender,email,engine) VALUES ('"
		Sqlstring=Sqlstring & username & "','" & password & "','" & fname & "','" & lname & "'," & yearborn & ",'" & phone & "','" & kidomet & "','" & gender & "','" & email & "','" & engine & "')"
			
		oConn.execute (Sqlstring)			
		oConn.Close			
		set Oconn=Nothing		
	End if		
%>	
</body>
</html>

*הערה - אם אתה רוצה להכניס ערך מספרי למסד, לעמודה מסוג מספר,
אתה לא שם מרכאות כאלה (') במשפט SQL, כדי שלא יכנס כמחרוזת. דוגמא:


"'," & yearborn & ",'"

בניגוד לשאר המשתנים.

אם יש בעיות, תגיד לי בבקשה.

בהצלחה


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   22:12   01.02.07   
אל הפורום  
  18. תודה רבה :} ויש לי שאלה  
בתגובה להודעה מספר 17
 
   ערכתי לאחרונה בתאריך 01.02.07 בשעה 22:15 בברכה, KAN
 
הבנתי שהערכים בסוגריים אחרי ה TblUsers הם השדות בטבלה
אז מה זה הערכים שאחרי הvalues?
אלה משתני הdim?
ולמה בקידומת
זה לא מראה את הספרה הראשונה
במקום 050 זה רושם בטבלה 50


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
MeToR
חבר מתאריך 26.1.07
11 הודעות, דרג אמינות חבר זה 		   23:22   01.02.07   
אל הפורום  
  19. תשובות:  
בתגובה להודעה מספר 18
 
   ערכתי לאחרונה בתאריך 01.02.07 בשעה 23:23 בברכה, MeToR
 
כמו שאמרת, ואמרת נכון, השמות בסוגריים אחרי שם הטבלה, הם השדות בטבלה,
והערכים שאחרי ה-VALUES, אלו הערכים שנכנסים לתוך הטבלה, במקרה זה
משתני ה-dim.

זה מראה לך 50 במקום 050 כנראה בגלל שהגדרת את שדה הקידומת בטבלה
שלך כ-'מספר' ולא כ-'טקסט'.
תגדיר אותו כ-'טקסט'.

בהצלחה


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   12:01   02.02.07   
אל הפורום  
  20. תודה ועוד שאלה במשהו אחר  
בתגובה להודעה מספר 19
 
   אני רוצה לעשות
שאם המשתמש כבר קיים בטבלה אז זה לא יאפשר להירשם
וזה מה שעשיתי

set CheckRS=server.CreateObject("adodb.recordset")
			sqlstring2="select userName from TblUsers"
			CheckRS.open sqlstring2,oConn
			Sqlstring="insert into TblUsers (username,password,fName,lName,bYear,phone,kidomet,gender,email,engine) values('"&userName&"','"&password&"','"&fName&"','"&lName&"',"&bYear&","&phone&","&kidomet&",'"&gender&"','"&email&"',"&engine&")"
			do while CheckRS.eof
				if CheckRS.fields("userName")=request.form("username") Then
					response.write "המשתמש קיים באתר"
				End if
			loop

זה בנוי על הקוד הקודם
פשוט הכנסתי את זה באמצע
וזה לא עובד
זה עדיין רושם כל משתמש


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
MeToR
חבר מתאריך 26.1.07
11 הודעות, דרג אמינות חבר זה 		   13:36   02.02.07   
אל הפורום  
  22. כנס אחי...  
בתגובה להודעה מספר 20
 
   כדי לבדוק אם משתמש מסויים כבר קיים, אתה צריך להריץ שאילתת שליפת
נתונים, ולא הכנסת נתונים.
קודם כל תשתמש בשאילתת SELECT, ואז אם המשתמש לא קיים, תשתמש
בשאילתת INSERT.

קוד:


<%		
	if not isEmpty(request.form("userName")) then
		
		dim oConn, rs, username
		
		username=request.form("username")
		set oConn=server.createobject("adodb.connection")
		oConn.mode = 3
		set rs=server.createobject("adodb.recordset")	
		oConn.Open "Driver={Microsoft Access Driver (*.mdb)}; Dbq=" & Server.MapPath("r2.mdb") &  ";Uid=; Pwd=;"
		Sqlstring="SELECT id FROM TblUsers WHERE username='" & 	username & "'"
		rs.open Sqlstring,oConn
		
		if not rs.eof then
			response.write ("שם משתמש זה כבר קיים.")
		else
		
			dim password, fname, lname, yearborn, phone, kidomet, gender, email, engine			
			
			password=request.form("password")			
			fname=request.form("fname")			
			lname=request.form("lname")			
			yearborn=request.form("yearborn")			
			phone=request.form("phone")			
			kidomet=request.form("kidomet")			
			gender=request.form("gender")			
			email=request.form("email")			
			engine=request.form("engine")				
			Sqlstring="INSERT into TblUsers (username,password,fname,lname,yearborn,phone,kidomet,gender,email,engine) VALUES ('"
			Sqlstring=Sqlstring & username & "','" & password & "','" & fname & "','" & lname & "'," & yearborn & ",'" & phone	& "','" & kidomet & "','" & gender & "','" & email & "','" & engine & "')"
			oConn.execute (Sqlstring)			
		End if
		rs.Close
		set rs=Nothing
		oConn.Close			
		set Oconn=Nothing		
	End if		
%>

* המסומן בכחול זה הקוד של בדיקת משתמש.

בהצלחה


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
akoka

דרג אמינות חבר זה 		   13:40   02.02.07   
אל הפורום  
  23. הוא רוצה לדעתי שלא יכניסו משתמשים כפולים למסד:/  
בתגובה להודעה מספר 22
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
MeToR
חבר מתאריך 26.1.07
11 הודעות, דרג אמינות חבר זה 		   13:43   02.02.07   
אל הפורום  
  24. זה בדיוק מה שעשיתי...  
בתגובה להודעה מספר 23
 
   עשיתי בדיקה אם שם המשתמש שהתבקש קיים כבר במסד, ואם כן, זה לא ייתן לו להירשם.


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   15:32   02.02.07   
אל הפורום  
  25. תודה רבה :}  
בתגובה להודעה מספר 22
 
   הבעיה אצלי הייתה
שעשיתי while
במקום if
תודה עזרת לי מאוד :}


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
KAN 
חבר מתאריך 1.8.02
18277 הודעות, דרג אמינות חבר זה 		   16:05   02.02.07   
אל הפורום  
  26. מקודם זה עבד לי ועכשיו שום פעם לא עובד :[  
בתגובה להודעה מספר 25
 
   הקוד עצמו שעשיתי:


		<%
		if not isEmpty(request.form("userName")) then
			dim userName
			dim password
			dim fName
			dim lName
			dim bYear
			dim phone
			dim kidomet
			dim gender
			dim email
			dim engine
			userName=request.form("userName")
			password=request.form("password")
			fName=request.form("fName")
			lName=request.form("lName")
			bYear=request.form("Year")
			phone=request.form("phone")
			kidomet=request.form("kidomet")
			gender=request.form("gender")
			email=request.form("email")
			engine=request.form("engine")
			set oConn =server.CreateObject("adodb.connection")
			oConn.Open "Driver={Microsoft Access Driver (*.mdb)};"&_
				"Dbq=" & Server.MapPath("Register.mdb") & ";" &_
				"Uid=;"&_
				"Pwd=;"
			set CheckRS=server.CreateObject("adodb.recordset")
			sqlstring2="select userName from TblUsers"
			CheckRS.open sqlstring2,oConn
			if not CheckRS.eof then
				response.write "xcxcxxxcxcxcxcxc"
			else
				Sqlstring="insert into TblUsers (username,password,fName,lName,bYear,phone,kidomet,gender,email,engine) values('"&userName&"','"&password&"','"&fName&"','"&lName&"',"&bYear&","&phone&",'"&kidomet&"','"&gender&"','"&email&"','"&engine&"')"
				oConn.execute(Sqlstring)
			End if
		End if
		CheckRS.Close
		set CheckRS=Nothing
		oConn.Close
		set oConn=Nothing
		%>

זה כל הזמן מראה את ההודעה שקיים משתמש


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
MeToR
חבר מתאריך 26.1.07
11 הודעות, דרג אמינות חבר זה 		   16:37   02.02.07   
אל הפורום  
  27. פיתרון:  
בתגובה להודעה מספר 26
 
   משפט ה-SELECT שעשית לא טוב.
רשמת:

sqlstring2="select userName from TblUsers"

ולכן ברגע שיש אפילו משתמש אחד, עם שם משתמש כלשהו, זה לא ייתן לך להירשם.

תיקון:


sqlstring2="SELECT username FROM TblUsers WHERE username='" & username & "'"


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד
akoka

דרג אמינות חבר זה 		   13:03   02.02.07   
אל הפורום  
  21. בשביל זה אתה צריך ליצור id מפתח ייחודי .  
בתגובה להודעה מספר 0
 
  


                                                         (ניהול: מחק תגובה)
מכתב זה והנלווה אליו, על אחריות ועל דעת הכותב בלבד

תגובה מהירה  למכתב מספר: 
 
___________________________________________________________________

___________________________________________________________________
למנהלים:  נעל | תייק בארכיון | מחק | העבר לפורום אחר | מחק תגובות | עגן אשכול
       



© כל הזכויות שמורות ל-רוטר.נט בע"מ rotter.net